summaryrefslogtreecommitdiff
path: root/lisp/ibuffer.el
diff options
context:
space:
mode:
authorJohn Paul Wallington <jpw@pobox.com>2002-12-09 23:46:12 +0000
committerJohn Paul Wallington <jpw@pobox.com>2002-12-09 23:46:12 +0000
commit4ba1612761c358928e641522c4f52cb91ffaaf48 (patch)
tree18c189dcc9088ba32f80e303299260a8a7d18584 /lisp/ibuffer.el
parentd852822674aab5332e2d417fd8d8734e1fa59a92 (diff)
downloademacs-4ba1612761c358928e641522c4f52cb91ffaaf48.tar.gz
* ibuffer.el (ibuffer-mode): If `show-paren-mode' is enabled,
disable it buffer-locally. (ibuffer-mouse-popup-menu): Use `=' instead of `eq' to compare `eventpt' and point. * ibuf-ext.el (ibuffer-remove-duplicates): New function. (ibuffer-set-filter-groups-by-mode): Use it instead of `delete-duplicates' so we don't require cl library at runtime. (ibuffer-insert-filter-group-before): Don't use `position' so we don't require cl library at runtime. * chistory.el (command-history-mode): Add interactive spec. Improve doc string.
Diffstat (limited to 'lisp/ibuffer.el')
-rw-r--r--lisp/ibuffer.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/ibuffer.el b/lisp/ibuffer.el
index 3838212b304..0fa9207bf54 100644
--- a/lisp/ibuffer.el
+++ b/lisp/ibuffer.el
@@ -883,7 +883,7 @@ width and the longest string in LIST."
(save-excursion
(popup-menu ibuffer-mode-operate-map)))))
(setq buffer-read-only t)
- (if (eq eventpt (point))
+ (if (= eventpt (point))
(goto-char origpt)))))
(defun ibuffer-skip-properties (props direction)
@@ -2387,6 +2387,9 @@ will be inserted before the group at point."
;; This makes things less ugly for Emacs 21 users with a non-nil
;; `show-trailing-whitespace'.
(setq show-trailing-whitespace nil)
+ ;; disable `show-paren-mode' buffer-locally
+ (if (bound-and-true-p show-paren-mode)
+ (set (make-local-variable 'show-paren-mode) nil))
(set (make-local-variable 'revert-buffer-function)
#'ibuffer-update)
(set (make-local-variable 'ibuffer-sorting-mode)