Browse Source

added support for CSS

Eric Schulte 16 years ago
parent
commit
96c9696064
3 changed files with 55 additions and 1 deletions
  1. 50 0
      lisp/langs/org-babel-css.el
  2. 1 0
      lisp/org-babel-init.el
  3. 4 1
      org-babel.org

+ 50 - 0
lisp/langs/org-babel-css.el

@@ -0,0 +1,50 @@
+;;; org-babel-css.el --- org-babel functions for css evaluation
+
+;; Copyright (C) 2009 Eric Schulte
+
+;; Author: Eric Schulte
+;; Keywords: literate programming, reproducible research
+;; Homepage: http://orgmode.org
+;; Version: 0.01
+
+;;; License:
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation; either version 3, or (at your option)
+;; any later version.
+;;
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs; see the file COPYING.  If not, write to the
+;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+;; Boston, MA 02110-1301, USA.
+
+;;; Commentary:
+
+;; Since CSS can't be executed, this file exists solely for tangling
+;; CSS from org-mode files.
+
+;;; Code:
+(require 'org-babel)
+
+(org-babel-add-interpreter "css")
+
+(add-to-list 'org-babel-tangle-langs '("css" "css"))
+
+(defun org-babel-execute:css (body params)
+  "Execute a block of CSS code with org-babel.  This function is
+called by `org-babel-execute-src-block' via multiple-value-bind."
+  (message "executing CSS source code block")
+  body)
+
+(defun org-babel-prep-session:css (session params)
+  "Prepare SESSION according to the header arguments specified in PARAMS."
+  (error "CSS sessions are nonsensical"))
+
+(provide 'org-babel-css)
+;;; org-babel-css.el ends here

+ 1 - 0
lisp/org-babel-init.el

@@ -66,6 +66,7 @@
 (require 'org-babel-dot)
 (require 'org-babel-dot)
 (require 'org-babel-asymptote)
 (require 'org-babel-asymptote)
 (require 'org-babel-sql)
 (require 'org-babel-sql)
+(require 'org-babel-css)
 
 
 ;; load the library of babel
 ;; load the library of babel
 (org-babel-lob-ingest (expand-file-name
 (org-babel-lob-ingest (expand-file-name

+ 4 - 1
org-babel.org

@@ -2506,7 +2506,7 @@ This is currently working only with emacs lisp as in the following
 example in the [[* emacs lisp source reference][emacs lisp source reference]].
 example in the [[* emacs lisp source reference][emacs lisp source reference]].
 
 
 
 
-** TODO Add languages [9/12]
+** TODO Add languages [10/13]
 I'm sure there are many more that aren't listed here.  Please add
 I'm sure there are many more that aren't listed here.  Please add
 them, and bubble any that you particularly care about up to the top.
 them, and bubble any that you particularly care about up to the top.
 
 
@@ -2534,6 +2534,9 @@ Things left to do
 | "information_schema" |
 | "information_schema" |
 | "test"               |
 | "test"               |
 
 
+*** DONE CSS
+trivial [[file:lisp/langs/org-babel-css.el][org-babel-css.el]]
+
 *** DONE ditaa
 *** DONE ditaa
 (see [[* file result types][file result types]])
 (see [[* file result types][file result types]])