null+****@clear*****
null+****@clear*****
Thu Jun 14 21:39:15 JST 2012
yuta yamada 2012-06-14 21:39:15 +0900 (Thu, 14 Jun 2012)
New Revision: a713eba3c6d517ab94bde1bb4c896f52bb5237f4
Log:
content -> terminal-output
Modified files:
logalimacs.el
Modified: logalimacs.el (+4 -4)
===================================================================
--- logalimacs.el 2012-06-14 21:34:35 +0900 (a4bbfbc)
+++ logalimacs.el 2012-06-14 21:39:15 +0900 (505a6a9)
@@ -228,13 +228,13 @@
(defun loga-lookup (&optional endpoint manual?)
(let* ((source-word (loga-decide-source-word manual?))
- (content (loga-command (concat "\"" source-word "\""))))
+ (terminal-output (loga-command (concat "\"" source-word "\""))))
(setq loga-current-command :lookup)
- (if (string< "" content)
+ (if (string< "" terminal-output)
(case endpoint
(:popup
- (loga-make-popup content))
- (t (loga-make-buffer content)))
+ (loga-make-popup terminal-output))
+ (t (loga-make-buffer terminal-output)))
(if loga-use-fallback
(text-translator/logalimacs-fallback-func)
(loga-not-found)))))