[logaling-commit] logaling/logalimacs [master] loga-popup-width -> loga-decide-width

Back to archive index

null+****@clear***** null+****@clear*****
Tue Jun 5 17:21:18 JST 2012


yuta yamada	2012-06-05 17:21:18 +0900 (Tue, 05 Jun 2012)

  New Revision: ac9ab6d76dcf753f2784eb1168c5b2386cca125f

  Log:
    loga-popup-width -> loga-decide-width

  Modified files:
    logalimacs.el

  Modified: logalimacs.el (+2 -2)
===================================================================
--- logalimacs.el    2012-06-05 17:15:42 +0900 (55efe93)
+++ logalimacs.el    2012-06-05 17:21:18 +0900 (0a02117)
@@ -432,12 +432,12 @@
 
 (defun loga-setup-point-and-width ()
   (case loga-popup-output-type
-    (:default (setq loga-popup-width (loga-popup-width)
+    (:default (setq loga-popup-width (loga-decide-width)
                     loga-popup-point (loga-decide-point)))
     (:width (setq loga-popup-width (window-width)
                   loga-popup-point (point-at-bol)))))
 
-(defun loga-popup-width ()
+(defun loga-decide-width ()
   (loop for (src-len . tgt-len) in (list loga-current-max-length)
         with sum = 0
         collect (+ src-len  tgt-len) into sum




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