Mercurial > emacs
changeset 35044:bb5e7a8b6f4c
Fix last change.
| author | Gerd Moellmann <gerd@gnu.org> |
|---|---|
| date | Thu, 04 Jan 2001 14:09:24 +0000 |
| parents | f7ca93e40e16 |
| children | 7b84da90af54 |
| files | lisp/tooltip.el |
| diffstat | 1 files changed, 4 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/tooltip.el Thu Jan 04 14:07:37 2001 +0000 +++ b/lisp/tooltip.el Thu Jan 04 14:09:24 2001 +0000 @@ -331,13 +331,13 @@ (fg (face-attribute 'tooltip :foreground)) (bg (face-attribute 'tooltip :background))) (unless (eq 'unspecified fg) - (tooltip-set-param params 'foreground-color fg)) + (setq params (tooltip-set-param params 'foreground-color fg))) (unless (eq 'unspecified bg) - (tooltip-set-param params 'background-color bg) - (tooltip-set-param params 'border-color bg)) + (setq params (tooltip-set-param params 'background-color bg)) + (setq params (tooltip-set-param params 'border-color bg))) (x-show-tip (propertize text 'face 'tooltip) (selected-frame) - tooltip-frame-parameters + params nil tooltip-x-offset tooltip-y-offset))