aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/ChangeLog4
-rw-r--r--lisp/emacs-lisp/tabulated-list.el4
2 files changed, 6 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 06a794a79fb..026b99872f0 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
12012-04-17 Chong Yidong <cyd@gnu.org>
2
3 * emacs-lisp/tabulated-list.el (tabulated-list-print): Fix typos.
4
12012-04-16 Alan Mackenzie <acm@muc.de> 52012-04-16 Alan Mackenzie <acm@muc.de>
2 6
3 Ensure searching for keywords is case sensitive. 7 Ensure searching for keywords is case sensitive.
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'.
215Optional argument REMEMBER-POS, if non-nil, means to move point 215Optional argument REMEMBER-POS, if non-nil, means to move point
216to the entry with the same ID element as the current line." 216to the entry with the same ID element as the current line."
217 (let ((inhibit-read-only t) 217 (let ((inhibit-read-only t)
218 (entries (if (functionp 'tabulated-list-entries) 218 (entries (if (functionp tabulated-list-entries)
219 (funcall tabulated-list-entries) 219 (funcall tabulated-list-entries)
220 tabulated-list-entries)) 220 tabulated-list-entries))
221 entry-id saved-pt saved-col) 221 entry-id saved-pt saved-col)
@@ -246,7 +246,7 @@ to the entry with the same ID element as the current line."
246 (setq entries (sort entries sorter)) 246 (setq entries (sort entries sorter))
247 (if (cdr tabulated-list-sort-key) 247 (if (cdr tabulated-list-sort-key)
248 (setq entries (nreverse entries))) 248 (setq entries (nreverse entries)))
249 (unless (functionp 'tabulated-list-entries) 249 (unless (functionp tabulated-list-entries)
250 (setq tabulated-list-entries entries))))) 250 (setq tabulated-list-entries entries)))))
251 ;; Print the resulting list. 251 ;; Print the resulting list.
252 (dolist (elt entries) 252 (dolist (elt entries)