emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] emacs/lisp/org ChangeLog org.el


From: Carsten Dominik
Subject: [Emacs-diffs] emacs/lisp/org ChangeLog org.el
Date: Fri, 06 Feb 2009 09:42:14 +0000

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Carsten Dominik <cdominik>      09/02/06 09:42:14

Modified files:
        lisp/org       : ChangeLog org.el 

Log message:
        2009-02-06  Carsten Dominik  <address@hidden>
        
                * org.el (org-format-latex): Stop LaTeX fragment processing in
                protected examples.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/org/ChangeLog?cvsroot=emacs&r1=1.64&r2=1.65
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/org/org.el?cvsroot=emacs&r1=1.45&r2=1.46

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/org/ChangeLog,v
retrieving revision 1.64
retrieving revision 1.65
diff -u -b -r1.64 -r1.65
--- ChangeLog   5 Feb 2009 06:40:58 -0000       1.64
+++ ChangeLog   6 Feb 2009 09:42:13 -0000       1.65
@@ -1,3 +1,8 @@
+2009-02-06  Carsten Dominik  <address@hidden>
+
+       * org.el (org-format-latex): Stop LaTeX fragment processing in
+       protected examples.
+
 2009-02-05  Glenn Morris  <address@hidden>
 
        * org-rmail.el (rmail-show-message): Update declaration.

Index: org.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/org/org.el,v
retrieving revision 1.45
retrieving revision 1.46
diff -u -b -r1.45 -r1.46
--- org.el      4 Feb 2009 23:01:59 -0000       1.45
+++ org.el      6 Feb 2009 09:42:14 -0000       1.46
@@ -12709,7 +12709,9 @@
       (when (member m matchers)
        (goto-char (point-min))
        (while (re-search-forward re nil t)
-         (when (or (not at) (equal (cdr at) (match-beginning n)))
+         (when (and (or (not at) (equal (cdr at) (match-beginning n)))
+                    (not (get-text-property (match-beginning n)
+                                            'org-protected)))
            (setq txt (match-string n)
                  beg (match-beginning n) end (match-end n)
                  cnt (1+ cnt)




reply via email to

[Prev in Thread] Current Thread [Next in Thread]