diff options
| author | Juanma Barranquero | 2004-04-15 23:13:16 +0000 |
|---|---|---|
| committer | Juanma Barranquero | 2004-04-15 23:13:16 +0000 |
| commit | dc5dcc000ac0885938e06e80b5f653ed615cab8b (patch) | |
| tree | 499f720c49cce399e4f1c2956cc8e86bbbb9c4f1 | |
| parent | d8e18df75ccbb4eef287b98981c90c1dd7565e64 (diff) | |
| download | emacs-dc5dcc000ac0885938e06e80b5f653ed615cab8b.tar.gz emacs-dc5dcc000ac0885938e06e80b5f653ed615cab8b.zip | |
(bookmark-send-edited-annotation): Fix docstring.
(bookmark-edit-annotation-mode): Add mode name.
| -rw-r--r-- | lisp/ChangeLog | 22 | ||||
| -rw-r--r-- | lisp/bookmark.el | 6 |
2 files changed, 11 insertions, 17 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 187e65f5de4..7f3ee667638 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2004-04-16 Juanma Barranquero <lektu@terra.es> | ||
| 2 | |||
| 3 | * bookmark.el (bookmark-send-edited-annotation): Fix docstring. | ||
| 4 | (bookmark-edit-annotation-mode): Add mode name. | ||
| 5 | |||
| 1 | 2004-04-15 Nick Roberts <nick@nick.uklinux.net> | 6 | 2004-04-15 Nick Roberts <nick@nick.uklinux.net> |
| 2 | 7 | ||
| 3 | * progmodes/gdb-ui.el (gdb-goto-info): New function. | 8 | * progmodes/gdb-ui.el (gdb-goto-info): New function. |
| @@ -294,7 +299,7 @@ | |||
| 294 | 299 | ||
| 295 | 2004-04-08 Nick Roberts <nick@nick.uklinux.net> | 300 | 2004-04-08 Nick Roberts <nick@nick.uklinux.net> |
| 296 | 301 | ||
| 297 | * progmodes/gdb-ui.el (gdb-source-window): Remove variable | 302 | * progmodes/gdb-ui.el (gdb-source-window): Remove variable. |
| 298 | (gdb-goto-breakpoint, gdb-display-buffer) | 303 | (gdb-goto-breakpoint, gdb-display-buffer) |
| 299 | (gdb-display-source-buffer, gdb-view-source-function) | 304 | (gdb-display-source-buffer, gdb-view-source-function) |
| 300 | (gdb-view-assembler, gdb-setup-windows, gdb-restore-windows) | 305 | (gdb-view-assembler, gdb-setup-windows, gdb-restore-windows) |
| @@ -381,19 +386,6 @@ | |||
| 381 | * help-mode.el (help-function-def, help-variable-def): Handle hyperrefs | 386 | * help-mode.el (help-function-def, help-variable-def): Handle hyperrefs |
| 382 | to C source files specially. | 387 | to C source files specially. |
| 383 | 388 | ||
| 384 | 2004-04-07 Stefan Monnier <monnier@iro.umontreal.ca> | ||
| 385 | |||
| 386 | * progmodes/compile.el: Require CL. | ||
| 387 | (compilation-mode-font-lock-keywords): Re-install the "line as | ||
| 388 | function" patch. | ||
| 389 | |||
| 390 | * help-fns.el (help-C-source-directory): New var. | ||
| 391 | (help-subr-name, help-C-file-name, help-find-C-source): New funs. | ||
| 392 | (describe-function-1, describe-variable): Use them. | ||
| 393 | |||
| 394 | * help-mode.el (help-function-def, help-variable-def): Handle hyperrefs | ||
| 395 | to C source files specially. | ||
| 396 | |||
| 397 | 2004-04-07 Jan Nieuwenhuizen <janneke@gnu.org> | 389 | 2004-04-07 Jan Nieuwenhuizen <janneke@gnu.org> |
| 398 | 390 | ||
| 399 | * info.el (Info-hide-cookies-node): New function. | 391 | * info.el (Info-hide-cookies-node): New function. |
| @@ -673,7 +665,7 @@ | |||
| 673 | 665 | ||
| 674 | * progmodes/gdb-ui.el (gdb-ann3, gdb-send-item) | 666 | * progmodes/gdb-ui.el (gdb-ann3, gdb-send-item) |
| 675 | (gud-gdba-marker-filter): Log the process input and output, if | 667 | (gud-gdba-marker-filter): Log the process input and output, if |
| 676 | required. (from Stefan Monnier) | 668 | required. From Stefan Monnier. |
| 677 | (gdb-debug-log, gdb-enable-debug-log): New variables. | 669 | (gdb-debug-log, gdb-enable-debug-log): New variables. |
| 678 | (gdb-post-prompt): Don't do gdb-var-update on Mac OS X. | 670 | (gdb-post-prompt): Don't do gdb-var-update on Mac OS X. |
| 679 | 671 | ||
diff --git a/lisp/bookmark.el b/lisp/bookmark.el index 67ae2c84865..3ed66f229a8 100644 --- a/lisp/bookmark.el +++ b/lisp/bookmark.el | |||
| @@ -893,7 +893,8 @@ When you have finished composing, type \\[bookmark-send-annotation]. | |||
| 893 | (make-local-variable 'bookmark-annotation-name) | 893 | (make-local-variable 'bookmark-annotation-name) |
| 894 | (setq bookmark-annotation-name bookmark) | 894 | (setq bookmark-annotation-name bookmark) |
| 895 | (use-local-map bookmark-edit-annotation-mode-map) | 895 | (use-local-map bookmark-edit-annotation-mode-map) |
| 896 | (setq major-mode 'bookmark-edit-annotation-mode) | 896 | (setq major-mode 'bookmark-edit-annotation-mode |
| 897 | mode-name "Edit Bookmark Annotation") | ||
| 897 | (insert (funcall bookmark-read-annotation-text-func bookmark)) | 898 | (insert (funcall bookmark-read-annotation-text-func bookmark)) |
| 898 | (let ((annotation (bookmark-get-annotation bookmark))) | 899 | (let ((annotation (bookmark-get-annotation bookmark))) |
| 899 | (if (and annotation (not (string-equal annotation ""))) | 900 | (if (and annotation (not (string-equal annotation ""))) |
| @@ -902,7 +903,8 @@ When you have finished composing, type \\[bookmark-send-annotation]. | |||
| 902 | 903 | ||
| 903 | 904 | ||
| 904 | (defun bookmark-send-edited-annotation () | 905 | (defun bookmark-send-edited-annotation () |
| 905 | "Use buffer contents (minus beginning with `#' as annotation for a bookmark." | 906 | "Use buffer contents as annotation for a bookmark. |
| 907 | Lines beginning with `#' are ignored." | ||
| 906 | (interactive) | 908 | (interactive) |
| 907 | (if (not (eq major-mode 'bookmark-edit-annotation-mode)) | 909 | (if (not (eq major-mode 'bookmark-edit-annotation-mode)) |
| 908 | (error "Not in bookmark-edit-annotation-mode")) | 910 | (error "Not in bookmark-edit-annotation-mode")) |