emacs-elpa-diffs
[Top][All Lists]
Advanced

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

[elpa] externals/auctex 30be9cc 09/78: Add support for prettify-symbols-


From: Tassilo Horn
Subject: [elpa] externals/auctex 30be9cc 09/78: Add support for prettify-symbols-mode
Date: Mon, 19 Oct 2015 09:10:39 +0000

branch: externals/auctex
commit 30be9cca33b2dc810cb2eeef214980734f5751b1
Author: Tassilo Horn <address@hidden>
Commit: Tassilo Horn <address@hidden>

    Add support for prettify-symbols-mode
    
    * tex.el (VirTeX-common-initialization): Add support for
    `prettify-symbols-mode'.
---
 ChangeLog |    5 +++++
 tex.el    |   18 ++++++++++++++----
 2 files changed, 19 insertions(+), 4 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 7201d85..99ceeb2 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2015-08-24  Tassilo Horn  <address@hidden>
+
+       * tex.el (VirTeX-common-initialization): Add support for
+       `prettify-symbols-mode'.
+
 2015-08-21  Mos� Giordano  <address@hidden>
 
        * tex-buf.el (TeX-check-engine): New customizable variable.
diff --git a/tex.el b/tex.el
index 07fa371..eda7651 100644
--- a/tex.el
+++ b/tex.el
@@ -127,7 +127,7 @@ If nil, none is specified."
     ("LaTeX" "%`%l%(mode)%' %t"
      TeX-run-TeX nil
      (latex-mode doctex-mode) :help "Run LaTeX")
-       ;; Not part of standard TeX.
+    ;; Not part of standard TeX.
     ("Makeinfo" "makeinfo %(extraopts) %t" TeX-run-compile nil
      (texinfo-mode) :help "Run Makeinfo with Info output")
     ("Makeinfo HTML" "makeinfo %(extraopts) --html %t" TeX-run-compile nil
@@ -144,7 +144,7 @@ If nil, none is specified."
     ("BibTeX" "bibtex %s" TeX-run-BibTeX nil t :help "Run BibTeX")
     ("Biber" "biber %s" TeX-run-Biber nil t :help "Run Biber")
     ,(if (or window-system (getenv "DISPLAY"))
-       '("View" "%V" TeX-run-discard-or-function t t :help "Run Viewer")
+        '("View" "%V" TeX-run-discard-or-function t t :help "Run Viewer")
        '("View" "dvi2tty -q -w 132 %s" TeX-run-command t t
         :help "Run Text viewer"))
     ("Print" "%p" TeX-run-command t t :help "Print the file")
@@ -264,8 +264,8 @@ Any additional elements get just transferred to the 
respective menu entries."
 
 (defcustom TeX-command-output-list
   '(
-; Add the following line if you want to use htlatex (tex4ht)
-;    ("\\`htlatex" ("html"))
+                                       ; Add the following line if you want to 
use htlatex (tex4ht)
+                                       ;    ("\\`htlatex" ("html"))
     )
   "List of regexps and file extensions.
 
@@ -3438,6 +3438,16 @@ The algorithm is as follows:
   (when TeX-source-correlate-mode
     (TeX-source-correlate-mode 1))
 
+  ;; Prettify Symbols mode
+  (when (and (boundp 'tex--prettify-symbols-alist)
+            (boundp 'prettify-symbols-compose-predicate))
+    (set (make-local-variable 'prettify-symbols-alist) 
tex--prettify-symbols-alist)
+    (if (fboundp 'add-function)
+       (add-function :override (local 'prettify-symbols-compose-predicate)
+                     #'tex--prettify-symbols-compose-p)
+      (set (make-local-variable 'prettify-symbols-compose-predicate)
+          #'tex--prettify-symbols-compose-p)))
+
   ;; Let `TeX-master-file' be called after a new file was opened and
   ;; call `TeX-update-style' on any file opened.  (The addition to the
   ;; hook has to be made here because its local value will be deleted



reply via email to

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