Hello,

Champagne!  My very first patch... Hopefully one that will be followed by many
more...

Goal: to *fontify whole lines* of code-block or meta-lines.

See the results on this minimal example:

--8<---------------cut here---------------start------------->8---
#+TITLE:     Better identification of source blocks and results
#+DATE:      2010-08-13
#+DESCRIPTION: 
#+KEYWORDS: 
#+LANGUAGE:  en_US

This is

#+BEGIN_SRC org
** Totals
*** Using a table formula
#+END_SRC

random text

#+LaTeX: \thisismycommand{}{param2}

inserted between

#+begin_src R :session woodland
names(woodland)
str(woodland)
summary(woodland)
#+end_src

code blocks

#+begin_src R :session woodland
woodland
#+end_src

copy from different

#+srcname:woodland
#+begin_src R :colnames t
read.table("/tmp/woodlands.txt",header=TRUE)
#+end_src

#+results: woodland
| "ID" | "wood"  | "A.reptans" | "E.amygdaloides" |
|------+---------+-------------+------------------|
| "a"  | "wood1" |           5 |               10 |
| "b"  | "wood2" |           1 |                0 |

postings on org-mode...
--8<---------------cut here---------------end--------------->8---

with *faces with background*, such as:

--8<---------------cut here---------------start------------->8---
     (org-block ((t (:foreground "blue1" :background "#EAFFEA"))))
     (org-code ((t (:foreground "blue1" :background "#EAFFEA"))))
     (org-meta-line ((t (:foreground "#008ED1" :background "#FFEAEA"))))
     (org-table ((t (:foreground "blue1" :background "#EAEAFF"))))
--8<---------------cut here---------------end--------------->8---

Only feature: I did not succeed highlighting full lines containing =srcname=
or =results=. Not a big deal. Though, if someone can do it, that would
definitely please me...

Best regards,
  Seb

-- 
Sébastien Vauban