mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-24 07:20:37 +00:00
Code Issues Releases Activity

(tooltip-mode): Don't complain that you can't turn the

Browse Source 
feature ON when the user requests to turn it OFF.
This commit is contained in:
Stefan Monnier 2005-03-10 14:45:31 +00:00
parent 449808f757
commit ef75a64773
2 changed files with 9 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
lisp/ChangeLog
View File

@ -1,15 +1,18 @@
2005-03-10 Stefan Monnier <monnier@iro.umontreal.ca>
* tooltip.el (tooltip-mode): Don't complain that you can't turn the
feature ON when the user requests to turn it OFF.
2005-03-10 Lute Kamstra <lute@gnu.org> 2005-03-10 Lute Kamstra <lute@gnu.org>
* emacs-lisp/debug.el (debug-entry-code): Delete it. * emacs-lisp/debug.el (debug-entry-code): Delete it.
(implement-debug-on-entry): New function to replace (implement-debug-on-entry): New function to replace debug-entry-code.
debug-entry-code.
(debug-on-entry-1): Use implement-debug-on-entry. Delete the (debug-on-entry-1): Use implement-debug-on-entry. Delete the
second argument as the 2005-03-07 change makes it obsolete. second argument as the 2005-03-07 change makes it obsolete.
(debug-on-entry, cancel-debug-on-entry): Update call to (debug-on-entry, cancel-debug-on-entry): Update call to
debug-on-entry-1. debug-on-entry-1.
(debug, debugger-setup-buffer): Comment update. (debug, debugger-setup-buffer): Comment update.
(debugger-frame-number): Update to work with (debugger-frame-number): Update to work with implement-debug-on-entry.
implement-debug-on-entry.
2005-03-10 Jay Belanger <belanger@truman.edu> 2005-03-10 Jay Belanger <belanger@truman.edu>
@ -54,7 +57,7 @@
* textmodes/ispell.el (ispell-insert-word): New function. * textmodes/ispell.el (ispell-insert-word): New function.
(ispell-word): Use ispell-insert-word to insert a new word. (ispell-word): Use ispell-insert-word to insert a new word.
(ispell-process-line): Likewise (ispell-process-line): Likewise.
(ispell-complete-word): Likewise. (ispell-complete-word): Likewise.
2005-03-09 Glenn Morris <gmorris@ast.cam.ac.uk> 2005-03-09 Glenn Morris <gmorris@ast.cam.ac.uk>

2
lisp/tooltip.el
View File

@ -188,7 +188,7 @@ This might return nil if the event did not occur over a buffer."
With ARG, turn tooltip mode on if and only if ARG is positive." With ARG, turn tooltip mode on if and only if ARG is positive."
:global t :global t
:group 'tooltip :group 'tooltip
(unless (fboundp 'x-show-tip) (unless (or (null tooltip-mode) (fboundp 'x-show-tip))
(error "Sorry, tooltips are not yet available on this system")) (error "Sorry, tooltips are not yet available on this system"))
(let ((hook-fn (if tooltip-mode 'add-hook 'remove-hook))) (let ((hook-fn (if tooltip-mode 'add-hook 'remove-hook)))
(funcall hook-fn 'change-major-mode-hook 'tooltip-change-major-mode) (funcall hook-fn 'change-major-mode-hook 'tooltip-change-major-mode)