null+****@clear*****
null+****@clear*****
Wed Feb 1 22:24:34 JST 2012
yuta yamada 2012-02-01 22:24:34 +0900 (Wed, 01 Feb 2012)
New Revision: 896dbff6c7ca31befbec4d3ced79f2e859a2e0fa
Log:
fix errer message for lookup
Modified files:
logalimacs.el
Modified: logalimacs.el (+3 -2)
===================================================================
--- logalimacs.el 2012-01-30 22:56:38 +0900 (9ba33ef)
+++ logalimacs.el 2012-02-01 22:24:34 +0900 (215a269)
@@ -234,8 +234,9 @@
(cond
((not (require 'popup nil t))
(message "Can't lookup, it is require popup.el."))
- ((equal "" content) (message "Not found"))
- (t (popup-tip content :scroll-bar t :margin loga-popup-margin))))
+ ((equal "" content)
+ (message (concat "'" (caar loga-word-cache) "' is not found")))
+ (t (popup-tip content :margin loga-popup-margin))))
;;;###autoload
(defun loga-fly-mode ()