* ibuffer.el (ibuffer-sort-bufferlist): Require ibuf-ext

  if the sorting functions are not loaded.  (Bug#1432)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 32393579676d0f0e588d28dfd78914e36c49bf68..b77dee17d56ad171e7a26a3e66c74aca0c435900 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2008-12-04  Juanma Barranquero  <lekktu@gmail.com>
+
+       * ibuffer.el (ibuffer-sort-bufferlist): Require ibuf-ext
+       if the sorting functions are not loaded.  (Bug#1432)
+
 2008-12-04  Sam Steingold  <sds@gnu.org>
 
        * progmodes/compile.el (compilation-read-command): Extracted from
@@ -11817,7 +11822,6 @@
        systems without 12 months per year.
 
        (calendar-date-is-visible-p): Doc fix.  Simplify.
-
        * calendar/holidays.el (holiday-filter-visible-calendar): Return result
        from dolist.
 

diff --git a/lisp/ibuffer.el b/lisp/ibuffer.el
index 262f2ad73ab0eec8b972abe4c22c40eb47141de9..2aeaf7e1111d943e4be003b32383de6691cef6bf 100644 (file)
--- a/lisp/ibuffer.el
+++ b/lisp/ibuffer.el
@@ -2191,6 +2191,9 @@ If optional arg SILENT is non-nil, do not display progress messages."
              ibuffer-header-line-format)))
 
 (defun ibuffer-sort-bufferlist (bmarklist)
+  (unless ibuffer-sorting-functions-alist
+    ;; make sure the sorting functions are loaded
+    (require 'ibuf-ext))
   (let* ((sortdat (assq ibuffer-sorting-mode
                        ibuffer-sorting-functions-alist))
         (func (caddr sortdat)))