[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/auctex 6cb1e7d 07/43: Remove XEmacs compatibility code
From: |
Tassilo Horn |
Subject: |
[elpa] externals/auctex 6cb1e7d 07/43: Remove XEmacs compatibility code in tex.el |
Date: |
Tue, 20 Mar 2018 11:34:06 -0400 (EDT) |
branch: externals/auctex
commit 6cb1e7deb69a199949926f4a2b33c2bb6b250c13
Author: Mosè Giordano <address@hidden>
Commit: Mosè Giordano <address@hidden>
Remove XEmacs compatibility code in tex.el
* tex.el (TeX-source-correlate-gnuserv-p):
(TeX-source-correlate-map):
(VirTeX-common-initialization):
(TeX-mode-map):
(TeX-search-syntax-table): Remove code for compatibility with XEmacs.
---
tex.el | 28 +++++-----------------------
1 file changed, 5 insertions(+), 23 deletions(-)
diff --git a/tex.el b/tex.el
index bedd252..be81f73 100644
--- a/tex.el
+++ b/tex.el
@@ -1808,8 +1808,7 @@ search, can set the variable.")
(processp gnuserv-process)))
((and (boundp 'server-process)
(processp server-process))
- nil)
- ((featurep 'xemacs))))
+ nil)))
(defun TeX-source-correlate-server-enabled-p ()
"Return non-nil if Emacs server or gnuserv is enabled."
@@ -1879,12 +1878,7 @@ If this is nil, an empty string will be returned."
TeX-synctex-tex-flags)
""))
-(defvar TeX-source-correlate-map
- (let ((map (make-sparse-keymap)))
- ;; (if (featurep 'xemacs)
- ;; (define-key map [(control button1)] #'TeX-view-mouse)
- ;; (define-key map [C-down-mouse-1] #'TeX-view-mouse))
- map)
+(defvar TeX-source-correlate-map (make-sparse-keymap)
"Keymap for `TeX-source-correlate-mode'.
You could use this for unusual mouse bindings.")
@@ -3877,11 +3871,6 @@ The algorithm is as follows:
;; `(TeX-master-file nil nil t)' has to be called *before*
;; `TeX-update-style' as the latter will call `TeX-master-file'
;; without the `ask' bit set.
- (when (featurep 'xemacs)
- (unless (boundp 'find-file-hook)
- (defvaralias 'find-file-hook 'find-file-hooks))
- (when (not (emacs-version>= 21 5))
- (make-local-hook 'find-file-hook)))
(add-hook 'find-file-hook
(lambda ()
;; Check if we are looking at a new or shared file.
@@ -5052,14 +5041,9 @@ Brace insertion is only done if point is in a math
construct and
(define-key map "\C-c^" 'TeX-home-buffer)
(define-key map "\C-c`" 'TeX-next-error)
;; Remap bindings of `next-error'
- (if (featurep 'xemacs)
- (substitute-key-definition 'next-error 'TeX-next-error map global-map)
- (define-key map [remap next-error] 'TeX-next-error))
+ (define-key map [remap next-error] 'TeX-next-error)
;; Remap bindings of `previous-error'
- (if (featurep 'xemacs)
- (substitute-key-definition 'previous-error 'TeX-previous-error
- map global-map)
- (define-key map [remap previous-error] 'TeX-previous-error))
+ (define-key map [remap previous-error] 'TeX-previous-error)
;; From tex-fold.el
(define-key map "\C-c\C-o\C-f" 'TeX-fold-mode)
@@ -5501,9 +5485,7 @@ regardless of its data type."
;;; Navigation
(defvar TeX-search-syntax-table
- (let ((table (make-syntax-table (make-char-table (if (featurep 'xemacs)
- 'syntax
- 'syntax-table)))))
+ (let ((table (make-syntax-table (make-char-table 'syntax-table))))
;; Preset mode-independent syntax entries. (Mode-dependent
;; entries are set in the function `TeX-search-syntax-table'.)
;; ?\", ?\( and ?\) explicitely get whitespace syntax because
- [elpa] externals/auctex updated (aeeedbd -> 0011b68), Tassilo Horn, 2018/03/20
- [elpa] externals/auctex 6cb1e7d 07/43: Remove XEmacs compatibility code in tex.el,
Tassilo Horn <=
- [elpa] externals/auctex 2df2746 14/43: Delete unused options, Tassilo Horn, 2018/03/20
- [elpa] externals/auctex 52e1426 02/43: Remove XEmacs compatibility code in latex.el, Tassilo Horn, 2018/03/20
- [elpa] externals/auctex 8f46dea 08/43: Remove TeX-line-number-at-pos, Tassilo Horn, 2018/03/20
- [elpa] externals/auctex 9ba765e 04/43: Remove TeX-deactivate-mark, Tassilo Horn, 2018/03/20
- [elpa] externals/auctex 12618af 09/43: Remove code for compatibility with old Emacsens in tex.el, Tassilo Horn, 2018/03/20
- [elpa] externals/auctex 77c2cda 15/43: Remove XEmacs compatibility code in tex-jp.el, Tassilo Horn, 2018/03/20
- [elpa] externals/auctex 6861a88 10/43: Change encoding of Elisp source files to UTF-8, Tassilo Horn, 2018/03/20
- [elpa] externals/auctex 62d3606 18/43: Remove compatibility code for XEmacs in tex-fold.el, Tassilo Horn, 2018/03/20
- [elpa] externals/auctex 05c09bd 06/43: Remove TeX-how-many function, Tassilo Horn, 2018/03/20
- [elpa] externals/auctex f366130 03/43: Remove old compat functions for commenting and uncommenting, Tassilo Horn, 2018/03/20