# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1235707282 0
# Node ID ee7d5d4ca6e720988af8cf604754a66f76d44916
# Parent  23fb4f756c63e854a9200ea41499c3b5f413bc51
(find-lisp-object-file-name): Need a buffer position, not just a
buffer, to find a definition.

diff -r 23fb4f756c63 -r ee7d5d4ca6e7 lisp/ChangeLog
--- a/lisp/ChangeLog	Fri Feb 27 04:00:45 2009 +0000
+++ b/lisp/ChangeLog	Fri Feb 27 04:01:22 2009 +0000
@@ -1,3 +1,11 @@
+2009-02-27  Glenn Morris  <rgm@gnu.org>
+
+	* help-fns.el (find-lisp-object-file-name): Need a buffer position, not
+	just a buffer, to find a definition.
+
+	* mail/rmail.el (rmail-speedbar-move-message): Preserve the directory
+	part against rmail-output's oddness.
+
 2009-02-27  Chong Yidong  <cyd@stupidchicken.com>
 
 	* menu-bar.el (menu-set-font): Assign the same font object to all
diff -r 23fb4f756c63 -r ee7d5d4ca6e7 lisp/help-fns.el
--- a/lisp/help-fns.el	Fri Feb 27 04:00:45 2009 +0000
+++ b/lisp/help-fns.el	Fri Feb 27 04:01:22 2009 +0000
@@ -263,7 +263,7 @@
 	     (condition-case nil
 		 (find-function-search-for-symbol object nil file-name)
 	       (error nil))))
-	(when location
+	(when (cdr location)
 	  (with-current-buffer (car location)
 	    (goto-char (cdr location))
 	    (when (re-search-backward