Mercurial > emacs
diff lisp/org/org-export-latex.el @ 101568:f5aedb5cbd80
2009-01-27 Carsten Dominik <carsten.dominik@gmail.com>
* org.el (org-todo): Return correct state type even if the blocker
throws an error.
(org-modifier-cursor-error): Renamed from
`org-shiftcursor-error'.
(org-shiftmetaleft, org-shiftmetaright, org-shiftmetaup)
(org-shiftmetadown): Call `org-modifier-cursor-error'.
* org-agenda.el (org-agenda-todo): Call `org-todo' interactively,
to get real errors from the blocker hook.
* org.el (org-shiftselect-error, org-call-for-shift-select): New
functions.
(org-set-visibility-according-to-property): Turn off the setting
of `org-show-entry-below', to avoid overruling a FOLDED visibility
property.
* org.el (org-support-shift-select): New option.
(org-shiftup, org-shiftdown, org-shiftright, org-shiftleft)
(org-shiftcontrolright, org-shiftcontrolleft): Support for shift
selection outside contexts.
* org-list.el (org-at-item-bullet-p): New function.
* org-jsinfo.el (org-infojs-handle-options): Remove unnecessary
variables.
* org-footnote.el (org-footnote-normalize): Remove unnecessary
variable.
(org-insert-footnote-reference-near-definition): Remove
unnecessary let form.
author | Carsten Dominik <dominik@science.uva.nl> |
---|---|
date | Tue, 27 Jan 2009 11:38:21 +0000 |
parents | 9f423e131117 |
children | 59ea090317cd |
line wrap: on
line diff
--- a/lisp/org/org-export-latex.el Tue Jan 27 09:40:25 2009 +0000 +++ b/lisp/org/org-export-latex.el Tue Jan 27 11:38:21 2009 +0000 @@ -4,7 +4,7 @@ ;; ;; Emacs Lisp Archive Entry ;; Filename: org-export-latex.el -;; Version: 6.19a +;; Version: 6.19e ;; Author: Bastien Guerry <bzg AT altern DOT org> ;; Maintainer: Bastien Guerry <bzg AT altern DOT org> ;; Keywords: org, wp, tex @@ -434,7 +434,8 @@ (region-p nil) (t (plist-get opt-plist :skip-before-1st-heading)))) (text (plist-get opt-plist :text)) - (first-lines (if skip "" (org-export-latex-first-lines opt-plist rbeg))) + (first-lines (if skip "" (org-export-latex-first-lines + opt-plist rbeg))) (coding-system (and (boundp 'buffer-file-coding-system) buffer-file-coding-system)) (coding-system-for-write (or org-export-latex-coding-system @@ -1306,7 +1307,7 @@ ;; Convert LaTeX to \LaTeX{} (goto-char (point-min)) - (let ((case-fold-search nil) rpl) + (let ((case-fold-search nil)) (while (re-search-forward "\\([^+_]\\)LaTeX" nil t) (org-if-unprotected (replace-match (org-export-latex-protect-string