diff options
| author | Juanma Barranquero | 2007-02-19 13:39:33 +0000 |
|---|---|---|
| committer | Juanma Barranquero | 2007-02-19 13:39:33 +0000 |
| commit | b7f61dfee8849f3057903050e85f3f372c55b478 (patch) | |
| tree | 055ea7af71cb9b84b62dcb070fb994cd78e46261 | |
| parent | f65aa365b70b002762f81bc1d2267ed97dca95d2 (diff) | |
| download | emacs-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/ChangeLog | 18 | ||||
| -rw-r--r-- | lisp/speedbar.el | 12 |
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 @@ | |||
| 1 | 2007-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 | |||
| 1 | 2007-02-19 Kenichi Handa <handa@m17n.org> | 7 | 2007-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 | ||
| 24 | 2007-02-17 Chris Moore <dooglus@gmail.com> | 30 | 2007-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 | ||
| 29 | 2007-02-17 Eli Zaretskii <eliz@gnu.org> | 35 | 2007-02-17 Eli Zaretskii <eliz@gnu.org> |
| 30 | 36 | ||
| @@ -33,8 +39,8 @@ | |||
| 33 | 39 | ||
| 34 | 2007-02-17 Alin C. Soare <alinsoar@voila.fr> (tiny change) | 40 | 2007-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 | ||
| 39 | 2007-02-16 Stefan Monnier <monnier@iro.umontreal.ca> | 45 | 2007-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. |
| 319 | nil means don't show the file in the list." | 319 | A 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. |
| 978 | nil means toggle. Once the speedbar frame is activated, a buffer in | 978 | A 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 |
| 980 | supported at a time. | 980 | supported 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. |
| 1074 | nil if it doesn't exist." | 1074 | Return 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. |
| 1485 | nil if not applicable. If FILENAME, then use that instead of reading | 1485 | Return nil if not applicable. If FILENAME, then use that |
| 1486 | it from the speedbar buffer." | 1486 | instead 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. |
| 1495 | nil if not applicable." | 1495 | Return 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]+\\)" |