2009-02-04から1日間の記事一覧
(defun take-same-indent-string () (let* ((indent (current-indentation)) (start-point (point)) (end-point (save-excursion (forward-line) (loop while (and (not (>= indent (current-indentation))) (not (eobp))) do (forward-line) finally return…