null+****@clear*****
null+****@clear*****
Mon Jun 11 21:12:35 JST 2012
yuta yamada 2012-06-11 21:12:35 +0900 (Mon, 11 Jun 2012)
New Revision: b8c75b2f57d3aea1a76d132a6666aae93775ee9a
Log:
source-length and target-length -> &rest assigned-lengths
Modified files:
logalimacs.el
Modified: logalimacs.el (+1 -1)
===================================================================
--- logalimacs.el 2012-06-11 18:08:10 +0900 (ed35445)
+++ logalimacs.el 2012-06-11 21:12:35 +0900 (6310ca0)
@@ -311,7 +311,7 @@
(below-limit-p (< source-length loga-width-limit-source)))
(and more-than-max-p less-than-window-half-p below-limit-p)))
-(defun loga-less-than-window-half-p (source-length target-length)
+(defun loga-less-than-window-half-p (&rest assigned-lengths)
(let* ((half (- (/ (window-width) 2) 2)))
(> half (max source-length target-length))))