null+****@clear*****
null+****@clear*****
Tue Jun 5 17:23:15 JST 2012
yuta yamada 2012-06-05 17:23:15 +0900 (Tue, 05 Jun 2012)
New Revision: 66a260cd4bf7b2b060ccf4628b56751b8f12d440
Log:
src-len -> source-length
Modified files:
logalimacs.el
Modified: logalimacs.el (+2 -2)
===================================================================
--- logalimacs.el 2012-06-05 17:21:18 +0900 (0a02117)
+++ logalimacs.el 2012-06-05 17:23:15 +0900 (24d5f1a)
@@ -438,9 +438,9 @@
loga-popup-point (point-at-bol)))))
(defun loga-decide-width ()
- (loop for (src-len . tgt-len) in (list loga-current-max-length)
+ (loop for (source-length . tgt-len) in (list loga-current-max-length)
with sum = 0
- collect (+ src-len tgt-len) into sum
+ collect (+ source-length tgt-len) into sum
finally return (min (+ (car sum) 1) (window-width))))
;;;###autoload