null+****@clear*****
null+****@clear*****
Thu Jun 14 21:34:35 JST 2012
yuta yamada 2012-06-14 21:34:35 +0900 (Thu, 14 Jun 2012)
New Revision: d86105e126967a121e9353e99609ca1030603973
Log:
Reverse order of condition
Modified files:
logalimacs.el
Modified: logalimacs.el (+8 -8)
===================================================================
--- logalimacs.el 2012-06-14 21:23:40 +0900 (351218d)
+++ logalimacs.el 2012-06-14 21:34:35 +0900 (a4bbfbc)
@@ -230,14 +230,14 @@
(let* ((source-word (loga-decide-source-word manual?))
(content (loga-command (concat "\"" source-word "\""))))
(setq loga-current-command :lookup)
- (if (string= "" content)
- (if loga-use-fallback
- (text-translator/logalimacs-fallback-func)
- (loga-not-found))
- (case endpoint
- (:popup
- (loga-make-popup content))
- (t (loga-make-buffer content))))))
+ (if (string< "" content)
+ (case endpoint
+ (:popup
+ (loga-make-popup content))
+ (t (loga-make-buffer content)))
+ (if loga-use-fallback
+ (text-translator/logalimacs-fallback-func)
+ (loga-not-found)))))
(defun loga-not-found ()
(minibuffer-message