null+****@clear*****
null+****@clear*****
Fri Jun 29 22:30:09 JST 2012
yuta yamada 2012-06-29 22:30:09 +0900 (Fri, 29 Jun 2012) New Revision: d1a993f1152edc994f999d9e763a0636d8ec8975 https://github.com/logaling/logalimacs/commit/d1a993f1152edc994f999d9e763a0636d8ec8975 Log: Delete an unnecessary the setq Modified files: logalimacs.el Modified: logalimacs.el (+2 -1) =================================================================== --- logalimacs.el 2012-06-29 22:26:43 +0900 (25ea3f9) +++ logalimacs.el 2012-06-29 22:30:09 +0900 (15ce5eb) @@ -363,7 +363,8 @@ (defun loga-append-margin (source target note max-length) (let* ((margin (- (car max-length) (loga-compute-length source))) (column (concat source (spaces-string margin) ":" target))) - (if note (setq column `(,column ,(concat "\n" note))) + (if note + `(,column ,(concat "\n" note)) `(,column)))) (defun loga-query (&optional message) -------------- next part -------------- An HTML attachment was scrubbed...下载
