aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuanma Barranquero2007-02-19 13:39:33 +0000
committerJuanma Barranquero2007-02-19 13:39:33 +0000
commitb7f61dfee8849f3057903050e85f3f372c55b478 (patch)
tree055ea7af71cb9b84b62dcb070fb994cd78e46261
parentf65aa365b70b002762f81bc1d2267ed97dca95d2 (diff)
downloademacs-b7f61dfee8849f3057903050e85f3f372c55b478.tar.gz
emacs-b7f61dfee8849f3057903050e85f3f372c55b478.zip
(speedbar-frame-mode, speedbar-frame-width, speedbar-show-unknown-files,
speedbar-item-info-file-helper, speedbar-item-info-tag-helper): Doc fixes.
-rw-r--r--lisp/ChangeLog18
-rw-r--r--lisp/speedbar.el12
2 files changed, 18 insertions, 12 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 78ef2e9c273..3aef0f71f4b 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,7 +1,13 @@
12007-02-19 Juanma Barranquero <lekktu@gmail.com>
2
3 * speedbar.el (speedbar-frame-mode, speedbar-frame-width)
4 (speedbar-show-unknown-files, speedbar-item-info-file-helper)
5 (speedbar-item-info-tag-helper): Doc fixes.
6
12007-02-19 Kenichi Handa <handa@m17n.org> 72007-02-19 Kenichi Handa <handa@m17n.org>
2 8
3 * international/mule-cmds.el (locale-language-names): Map "eo" 9 * international/mule-cmds.el (locale-language-names):
4 to "Esperanto". 10 Map "eo" to "Esperanto".
5 11
6 * language/european.el ("Esperanto"): New language environment. 12 * language/european.el ("Esperanto"): New language environment.
7 13
@@ -23,8 +29,8 @@
23 29
242007-02-17 Chris Moore <dooglus@gmail.com> 302007-02-17 Chris Moore <dooglus@gmail.com>
25 31
26 * jka-cmpr-hook.el (jka-compr-compression-info-list): Recognize 32 * jka-cmpr-hook.el (jka-compr-compression-info-list):
27 backups of bz2 compressed files. 33 Recognize backups of bz2 compressed files.
28 34
292007-02-17 Eli Zaretskii <eliz@gnu.org> 352007-02-17 Eli Zaretskii <eliz@gnu.org>
30 36
@@ -33,8 +39,8 @@
33 39
342007-02-17 Alin C. Soare <alinsoar@voila.fr> (tiny change) 402007-02-17 Alin C. Soare <alinsoar@voila.fr> (tiny change)
35 41
36 * emacs-lisp/lisp-mode.el (calculate-lisp-indent): Added 42 * emacs-lisp/lisp-mode.el (calculate-lisp-indent):
37 indentation for the constants of Lisp. 43 Add indentation for the constants of Lisp.
38 44
392007-02-16 Stefan Monnier <monnier@iro.umontreal.ca> 452007-02-16 Stefan Monnier <monnier@iro.umontreal.ca>
40 46
diff --git a/lisp/speedbar.el b/lisp/speedbar.el
index 711957d9cd0..87176d0c1c8 100644
--- a/lisp/speedbar.el
+++ b/lisp/speedbar.el
@@ -316,7 +316,7 @@ The default buffer is the buffer in the selected window in the attached frame."
316 316
317(defcustom speedbar-show-unknown-files nil 317(defcustom speedbar-show-unknown-files nil
318 "*Non-nil show files we can't expand with a ? in the expand button. 318 "*Non-nil show files we can't expand with a ? in the expand button.
319nil means don't show the file in the list." 319A nil value means don't show the file in the list."
320 :group 'speedbar 320 :group 'speedbar
321 :type 'boolean) 321 :type 'boolean)
322 322
@@ -975,7 +975,7 @@ directories.")
975;;;###autoload 975;;;###autoload
976(defun speedbar-frame-mode (&optional arg) 976(defun speedbar-frame-mode (&optional arg)
977 "Enable or disable speedbar. Positive ARG means turn on, negative turn off. 977 "Enable or disable speedbar. Positive ARG means turn on, negative turn off.
978nil means toggle. Once the speedbar frame is activated, a buffer in 978A nil ARG means toggle. Once the speedbar frame is activated, a buffer in
979`speedbar-mode' will be displayed. Currently, only one speedbar is 979`speedbar-mode' will be displayed. Currently, only one speedbar is
980supported at a time. 980supported at a time.
981`speedbar-before-popup-hook' is called before popping up the speedbar frame. 981`speedbar-before-popup-hook' is called before popping up the speedbar frame.
@@ -1071,7 +1071,7 @@ selected. If the speedbar frame is active, then select the attached frame."
1071 1071
1072(defsubst speedbar-frame-width () 1072(defsubst speedbar-frame-width ()
1073 "Return the width of the speedbar frame in characters. 1073 "Return the width of the speedbar frame in characters.
1074nil if it doesn't exist." 1074Return nil if it doesn't exist."
1075 (frame-width speedbar-frame)) 1075 (frame-width speedbar-frame))
1076 1076
1077(defun speedbar-mode () 1077(defun speedbar-mode ()
@@ -1482,8 +1482,8 @@ This function can be replaced in `speedbar-mode-functions-list' as
1482 1482
1483(defun speedbar-item-info-file-helper (&optional filename) 1483(defun speedbar-item-info-file-helper (&optional filename)
1484 "Display info about a file that is on the current line. 1484 "Display info about a file that is on the current line.
1485nil if not applicable. If FILENAME, then use that instead of reading 1485Return nil if not applicable. If FILENAME, then use that
1486it from the speedbar buffer." 1486instead of reading it from the speedbar buffer."
1487 (let* ((item (or filename (speedbar-line-file))) 1487 (let* ((item (or filename (speedbar-line-file)))
1488 (attr (if item (file-attributes item) nil))) 1488 (attr (if item (file-attributes item) nil)))
1489 (if (and item attr) (speedbar-message "%s %-6d %s" (nth 8 attr) 1489 (if (and item attr) (speedbar-message "%s %-6d %s" (nth 8 attr)
@@ -1492,7 +1492,7 @@ it from the speedbar buffer."
1492 1492
1493(defun speedbar-item-info-tag-helper () 1493(defun speedbar-item-info-tag-helper ()
1494 "Display info about a tag that is on the current line. 1494 "Display info about a tag that is on the current line.
1495nil if not applicable." 1495Return nil if not applicable."
1496 (save-excursion 1496 (save-excursion
1497 (beginning-of-line) 1497 (beginning-of-line)
1498 (if (re-search-forward " [-+=]?> \\([^\n]+\\)" 1498 (if (re-search-forward " [-+=]?> \\([^\n]+\\)"