;ELC
;;; Compiled by LTX@Xue-LingTaos-MacBook-Pro.local on Wed Mar 16 23:18:08 2011
;;; from file /Users/LTX/Projects/Emacs/emacs/lisp/org/org-xoxo.el
;;; in Emacs version 24.0.50.1
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.

;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


(require 'org-exp)
#@48 Hook run after XOXO export, in the new buffer.
(defvar org-export-xoxo-final-hook nil (#$ . 565))
(defalias 'org-export-as-xoxo-insert-into #[(buffer &rest output) "rq\210\302\303	\")\207" [buffer output apply insert] 3])
(put 'org-export-as-xoxo-insert-into 'lisp-indent-function 1)
#@85 Export the org buffer as XOXO.
The XOXO buffer is named *xoxo-<source buffer name>*
(defalias 'org-export-as-xoxo #[(&optional buffer) "\306\307!\210r\310!q\210`\311\312 \313 \"\314\315\316\n\"!\317\320!!\321Q\322\f!\323,\324-eb\210r
q\210\325 \210)\326
\327\"\210\330\331d\332#\203\354\333\323!\211.G/\333\334!\212\335\225b\210\3360\337\340\215*P1/,V\203n\326
\341\"\210\202\303/,W\203\261,/Z\3352323W\203\240-\203\222\326
\342\"\210\326
\343\"\2102T\2112\202\202*-\203\303\326
\342\"\210\324-\202\303/,\232\203\303-\203\303\326
\342\"\210/,\332-1\335\234\344\232\203\341\326
\3451\323\324O\346$\210\202\350\326
\3471#\210+\202;,\3352424W\203-\203\326
\342\"\210\326
\343\"\2102T\2112\202\365*	b\210\350
!\210\351ed\324#\210\306\352!\210\353 \210eb.\207" [buffer pos opt-plist buffer-file-name filename out run-hooks org-export-first-hook get-buffer org-combine-plists org-default-export-plist org-infile-export-plist file-name-as-directory org-export-directory :xoxo file-name-sans-extension file-name-nondirectory ".html" find-file-noselect 1 nil erase-buffer org-export-as-xoxo-insert-into "<ol class='xoxo'>\n" re-search-forward "^\\(\\*+\\)[ 	]+\\(.+\\)" t match-string-no-properties 2 0 "" loop (byte-code "\301y\210\302\303!\203\304\305!P\202\306\307\"\210\202" [str nil looking-at "^[ 	]\\(.*\\)" match-string-no-properties 1 throw loop] 3) "\n<ol>\n" "</li>\n" "</ol>\n" 43 "<li class='" "'>" "<li>" switch-to-buffer-other-window indent-region org-export-xoxo-final-hook save-buffer last-level hanging-li hd level str text - #1=#:--cl-dotimes-temp-- #2=#:--cl-dotimes-temp--] 7 (#$ . 856) (list (current-buffer))])
(provide 'org-xoxo)
