bowbow99 / xyzzy.ansify

Common Lisp の xyzzy にないもの詰め合わせ予定地
MIT License
6 stars 0 forks source link

ansify:defun に ed:lisp-indent-hook を設定 #22

Closed miyamuko closed 12 years ago

miyamuko commented 12 years ago

ansify:defun に ed:lisp-indent-hook が設定されていないためインデントがおかしくなります。

他に同様の問題がないか以下で調べてみましたが defun のみのようです (ansify 0.03.00)。

(do-external-symbols (ansify-symbol :ansify)
  (let ((orginal-symbol (intern (string ansify-symbol))))
    (when (and (get orginal-symbol 'ed:lisp-indent-hook)
               (not (get ansify-symbol 'ed:lisp-indent-hook)))
      (format t "~A~%" ansify-symbol))))
defun
nil
bowbow99 commented 12 years ago

手元では ed::calc-lisp-indent いぢってて気付いてなかった。設定しておきます。