[Emacs-diffs] Changes to emacs/lisp/ibuf-ext.el,v

[Stefan Monnier]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Stefan Monnier <monnier>        08/01/16 15:57:43

Index: ibuf-ext.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/ibuf-ext.el,v
retrieving revision 1.61
retrieving revision 1.62
diff -u -b -r1.61 -r1.62
--- ibuf-ext.el 8 Jan 2008 20:44:59 -0000       1.61
+++ ibuf-ext.el 16 Jan 2008 15:57:42 -0000      1.62
@@ -228,7 +228,7 @@
       (ignore-errors
        (with-current-buffer buf
          (when (and ibuffer-auto-mode
-                    (eq major-mode 'ibuffer-mode))
+                    (derived-mode-p 'ibuffer-mode))
            (ibuffer-update nil t)))))))
 
 ;;;###autoload
@@ -236,7 +236,7 @@
   "Toggle use of Ibuffer's auto-update facility.
 With numeric ARG, enable auto-update if and only if ARG is positive."
   (interactive)
-  (unless (eq major-mode 'ibuffer-mode)
+  (unless (derived-mode-p 'ibuffer-mode)
     (error "This buffer is not in Ibuffer mode"))
   (set (make-local-variable 'ibuffer-auto-mode)
        (if arg
@@ -1386,7 +1386,7 @@
   (ibuffer-mark-on-buffer
    #'(lambda (buf)
        (with-current-buffer buf
-        (string-match regexp (format-mode-line mode-name))))))
+        (string-match regexp (format-mode-line mode-name nil nil buf))))))
 
 ;;;###autoload
 (defun ibuffer-mark-by-file-name-regexp (regexp)
@@ -1539,5 +1539,5 @@
 
 (provide 'ibuf-ext)
 
-;;; arch-tag: 9af21953-deda-4c30-b76d-f81d9128e76d
+;; arch-tag: 9af21953-deda-4c30-b76d-f81d9128e76d
 ;;; ibuf-ext.el ends here