* emacs-lisp/tabulated-list.el (tabulated-list-print): Fix typos.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 06a794a79fb01fb3099d5173de782e3ca746a915..026b99872f026c45bf76b39ea0841fd0b9b2915d 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2012-04-17  Chong Yidong  <cyd@gnu.org>
+
+       * emacs-lisp/tabulated-list.el (tabulated-list-print): Fix typos.
+
 2012-04-16  Alan Mackenzie  <acm@muc.de>
 
        Ensure searching for keywords is case sensitive.

diff --git a/lisp/emacs-lisp/tabulated-list.el b/lisp/emacs-lisp/tabulated-list.el
index f17b12da6a0dbdc0a54595be36857dda03b3db71..9439fba2b86fef47a039669812998e49a0bc0080 100644 (file)
--- a/lisp/emacs-lisp/tabulated-list.el
+++ b/lisp/emacs-lisp/tabulated-list.el
@@ -215,7 +215,7 @@ buffer and inserts the entries with `tabulated-list-printer'.
 Optional argument REMEMBER-POS, if non-nil, means to move point
 to the entry with the same ID element as the current line."
   (let ((inhibit-read-only t)
-       (entries (if (functionp 'tabulated-list-entries)
+       (entries (if (functionp tabulated-list-entries)
                     (funcall tabulated-list-entries)
                   tabulated-list-entries))
        entry-id saved-pt saved-col)
@@ -246,7 +246,7 @@ to the entry with the same ID element as the current line."
          (setq entries (sort entries sorter))
          (if (cdr tabulated-list-sort-key)
              (setq entries (nreverse entries)))
-         (unless (functionp 'tabulated-list-entries)
+         (unless (functionp tabulated-list-entries)
            (setq tabulated-list-entries entries)))))
     ;; Print the resulting list.
     (dolist (elt entries)