aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorUlrich Müller <ulm@gentoo.org>2022-05-01 19:15:38 +0200
committerUlrich Müller <ulm@gentoo.org>2022-05-01 19:15:38 +0200
commit2052ab77d3856593ae6c41d305377058d22ed0d2 (patch)
tree3acc8b33e7a113ac495863570749b41828f6c518
parentFix a byte-compile warning in eselect-mode (diff)
downloadeselect-2052ab77d3856593ae6c41d305377058d22ed0d2.tar.gz
eselect-2052ab77d3856593ae6c41d305377058d22ed0d2.tar.bz2
eselect-2052ab77d3856593ae6c41d305377058d22ed0d2.zip
Drop XEmacs compatibility code in eselect-mode
* misc/eselect-mode.el (eselect-mode-before-save): Call delete-trailing-whitespace which exists in XEmacs 21.5. Signed-off-by: Ulrich Müller <ulm@gentoo.org>
-rw-r--r--ChangeLog2
-rw-r--r--misc/eselect-mode.el6
2 files changed, 3 insertions, 5 deletions
diff --git a/ChangeLog b/ChangeLog
index 83b0289..4ef1610 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -2,6 +2,8 @@
* misc/eselect-mode.el (eselect-mode): For GNU Emacs, use
write-contents-functions instead of obsolete write-contents-hooks.
+ (eselect-mode-before-save): Call delete-trailing-whitespace which
+ exists in XEmacs 21.5.
2022-01-08 Ulrich Müller <ulm@gentoo.org>
diff --git a/misc/eselect-mode.el b/misc/eselect-mode.el
index 50e88d6..3bdac81 100644
--- a/misc/eselect-mode.el
+++ b/misc/eselect-mode.el
@@ -96,11 +96,7 @@
;;; Mode definitions.
(defun eselect-mode-before-save ()
- ;;(delete-trailing-whitespace) ; doesn't exist in XEmacs
- (save-excursion
- (goto-char (point-min))
- (while (re-search-forward "[ \t]+$" nil t)
- (delete-region (match-beginning 0) (point))))
+ (delete-trailing-whitespace)
;; return nil, otherwise the file is presumed to be written
nil)