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