diff options
author | John Paul Wallington <jpw@pobox.com> | 2002-12-09 23:46:12 +0000 |
---|---|---|
committer | John Paul Wallington <jpw@pobox.com> | 2002-12-09 23:46:12 +0000 |
commit | 4ba1612761c358928e641522c4f52cb91ffaaf48 (patch) | |
tree | 18c189dcc9088ba32f80e303299260a8a7d18584 /lisp/ibuffer.el | |
parent | d852822674aab5332e2d417fd8d8734e1fa59a92 (diff) | |
download | emacs-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.el | 5 |
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) |