branch: externals/auctex
commit 3b3c224493de2c5b5a36d30da6d5f7daa0002146
Author: Ikumi Keita <[email protected]>
Commit: Ikumi Keita <[email protected]>
Remove compatibility code for xemacs
* prv-emacs.el (preview-mark-active): Remove.
(): Update Copyright year.
* preview.el.in (LaTeX-preview-setup): Remove the above macro.
(): Update Copyright year.
---
preview.el.in | 6 +++---
prv-emacs.el | 6 +-----
2 files changed, 4 insertions(+), 8 deletions(-)
diff --git a/preview.el.in b/preview.el.in
index 9dd1cef..4c40534 100644
--- a/preview.el.in
+++ b/preview.el.in
@@ -1,7 +1,7 @@
;;; preview.el --- embed preview LaTeX images in source buffer
;; Copyright (C) 2001-2006, 2010-2015,
-;; 2017, 2018 Free Software Foundation, Inc.
+;; 2017-2019 Free Software Foundation, Inc.
;; Author: David Kastrup
;; Keywords: tex, wp, convenience
@@ -2497,14 +2497,14 @@ to add the preview functionality."
["(or toggle) at point" preview-at-point]
["for environment" preview-environment]
["for section" preview-section]
- ["for region" preview-region (preview-mark-active)]
+ ["for region" preview-region mark-active]
["for buffer" preview-buffer]
["for document" preview-document]
"---"
"Remove previews"
["at point" preview-clearout-at-point]
["from section" preview-clearout-section]
- ["from region" preview-clearout (preview-mark-active)]
+ ["from region" preview-clearout mark-active]
["from buffer" preview-clearout-buffer]
["from document" preview-clearout-document]
"---"
diff --git a/prv-emacs.el b/prv-emacs.el
index fe0f8f9..0afef66 100644
--- a/prv-emacs.el
+++ b/prv-emacs.el
@@ -1,6 +1,6 @@
;;; prv-emacs.el --- GNU Emacs specific code for preview.el
-;; Copyright (C) 2001-2005, 2018 Free Software Foundation, Inc.
+;; Copyright (C) 2001-2005, 2018, 2019 Free Software Foundation, Inc.
;; Author: David Kastrup
;; Keywords: convenience, tex, wp
@@ -568,10 +568,6 @@ The fourth value is the transparent border thickness."
(setq mask nil))
(vector bg fg mask preview-transparent-border)))
-(defmacro preview-mark-active ()
- "Return t if the mark is active."
- 'mark-active)
-
(defun preview-import-image (image)
"Convert the printable IMAGE rendition back to an image."
(cond ((stringp image)
