`:mode-hook`キーワードを使うとdocstring wider than 80 characters警告が表示される

[ncaq]

:mode-hook キーワードを知って試してみました。

以下のように書いてみました。

(leaf package
  :mode-hook
  ;; パッケージ名の幅を広く取る。
  (package-menu-mode-hook . ((setf (cadr (aref tabulated-list-format 0)) 50))))

すると、以下の警告を得ました。

warning         docstring wider than 80 characters (emacs-lisp)

flycheckの設定はファイル変数で行っています。

;; Local Variables:
;; byte-compile-warnings: (not cl-functions obsolete)
;; flycheck-disabled-checkers: (emacs-lisp-checkdoc)
;; End:

[conao3]

(prog1 'package
  (leaf-handler-leaf-path package)
  (leaf-handler-leaf-protect package
    (progn
      (defun leaf-keywords-mode-hook--package--package-menu-mode-hook nil
        "Function autogenerated by leaf-keywords in leaf-block `package' for hook `package-menu-mode-hook'."
        (setf (cadr (aref tabulated-list-format 0)) 50))
      (add-hook 'package-menu-mode-hook 'leaf-keywords-mode-hook--package--package-menu-mode-hook))))

程々に展開するとこうなるので、これのdocstringが長すぎるという話ですね。

まぁ、、修正するならこんな感じでしょうか？

      (defun leaf-keywords-mode-hook--package--package-menu-mode-hook nil
        "Function autogenerated by leaf-keywords.

         leaf-block: `package'
         hook: `package-menu-mode-hook'"
        (setf (cadr (aref tabulated-list-format 0)) 50))

[ncaq]

leafに慣れてなくて一回の展開だけで済ましてよく分からなくなってました。 そうですね、そのようになると良いのではと思います。

[ncaq]

実装したいと思うんですけど、GNUへの署名がちゃんとうまく行ってるかよく分からないんですよね 前に著作権譲渡の署名をした気はするんですが、どういう登録になっているのか今ひとつ分からない…

[conao3]

leaf-keywordsは3rd-partyのキーワード群で意図的に分割してるのでGNUの著作権割当て必要ないですー

[ncaq]

あっそうなんですか、じゃあ手が空いたらやりましょうかね