diff options
| author | Gerd Moellmann <gerd@gnu.org> | 2001-01-04 14:10:01 +0000 |
|---|---|---|
| committer | Gerd Moellmann <gerd@gnu.org> | 2001-01-04 14:10:01 +0000 |
| commit | f3b05e994e627e48fea81ff48551571803d35568 (patch) | |
| tree | e8b425e8549b005e7235ae7d57fb917d7604a6c7 /lisp/tooltip.el | |
| parent | 2621f5a96f7a359fc4a9ab827138fe4fc1d6f189 (diff) | |
| download | emacs-f3b05e994e627e48fea81ff48551571803d35568.tar.gz | |
Fix last change.
Diffstat (limited to 'lisp/tooltip.el')
| -rw-r--r-- | lisp/tooltip.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/tooltip.el b/lisp/tooltip.el index 408943f0048..f9d58802d7e 100644 --- a/lisp/tooltip.el +++ b/lisp/tooltip.el @@ -331,13 +331,13 @@ change the existing association. Value is the resulting alist." (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)) |