[logaling-commit] logaling/logalimacs [master] Fix problem that is slid position

Back to archive index

Yuta Yamada null+****@clear*****
Tue Aug 21 19:43:43 JST 2012


Yuta Yamada	2012-08-21 19:43:43 +0900 (Tue, 21 Aug 2012)

  New Revision: 2a1f24a32f0955af0a720c5597b61e49df46c5a0
  https://github.com/logaling/logalimacs/commit/2a1f24a32f0955af0a720c5597b61e49df46c5a0

  Log:
    Fix problem that is slid position

  Modified files:
    logalimacs.el

  Modified: logalimacs.el (+3 -2)
===================================================================
--- logalimacs.el    2012-08-11 22:23:40 +0900 (92ac387)
+++ logalimacs.el    2012-08-21 19:43:43 +0900 (71fdd26)
@@ -336,7 +336,8 @@ Example:
          (loga-current-endpoint endpoint)
          (source-word (or prototype-of-search-word (loga-decide-source-word)))
          (terminal-output (loga-command (concat "\"" source-word "\""))))
-    (if (string< "" terminal-output)
+    (save-excursion
+      (if (string< "" terminal-output)
         (case endpoint
           (:popup  (loga-make-popup
                     (loga-ignore-login-message terminal-output)))
@@ -346,7 +347,7 @@ Example:
         (if (functionp loga-fallback-function)
             (loga-fallback (caar loga-word-cache))
           (minibuffer-message
-           (format "%s is not found" source-word)))))))
+           (format "%s is not found" source-word))))))))
 
 (defun loga-decide-source-word ()
   (if mark-active
-------------- next part --------------
An HTML attachment was scrubbed...
다운로드 



More information about the logaling-commit mailing list
Back to archive index