diff options
author | Paul Eggert <eggert@cs.ucla.edu> | 2012-04-21 17:53:32 -0700 |
---|---|---|
committer | Paul Eggert <eggert@cs.ucla.edu> | 2012-04-21 17:53:32 -0700 |
commit | bbd347f5f7e99da1a559dad818b5fa8f59c0901e (patch) | |
tree | 77c1fc54c2240b08d2859109d18cac8812a8ffb1 /lisp/emacs-lisp/tabulated-list.el | |
parent | e4ecdc9c71af4199129d5dd2db1a32ff6b725fe4 (diff) | |
parent | 9ee7d8b93cb143b473e6dffb708e777bc6fe5bd0 (diff) | |
download | emacs-bbd347f5f7e99da1a559dad818b5fa8f59c0901e.tar.gz emacs-bbd347f5f7e99da1a559dad818b5fa8f59c0901e.tar.bz2 emacs-bbd347f5f7e99da1a559dad818b5fa8f59c0901e.zip |
Merge from trunk.
Diffstat (limited to 'lisp/emacs-lisp/tabulated-list.el')
-rw-r--r-- | lisp/emacs-lisp/tabulated-list.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/tabulated-list.el b/lisp/emacs-lisp/tabulated-list.el index f17b12da6a0..9439fba2b86 100644 --- 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) |