hiro/melpazoid
1
0
Fork 0
mirror of https://github.com/vale981/melpazoid synced 2025-03-05 09:21:39 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

feat: clarify "Copyright FSF" lint and add ;;; Commentary lint

Browse source
This commit is contained in:
riscy 2021-05-02 16:55:00 -07:00
parent f6b6622316
commit 960ea24953
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
melpazoid/melpazoid.el
View file

@ -202,7 +202,7 @@ a Docker container, e.g. kellyk/emacs does not include the .el files."
(melpazoid-misc "(with-temp-buffer (set-buffer " "`set-buffer` is unnecessary here") ; nofmt
(melpazoid-misc "(setq-default " "Packages should use `defvar-local`, not `setq-default`") ; nofmt
(melpazoid-misc "/tmp\\>" "Use `temporary-file-directory` instead of /tmp in code") ; nofmt
(melpazoid-misc "Copyright.*Free Software Foundation" "Have you done the paperwork or is this copy-pasted?" nil t) ; nofmt
(melpazoid-misc "Copyright.*Free Software Foundation" "Have you done the paperwork to assign this copyright?" nil t) ; nofmt
(melpazoid-misc "This file is part of GNU Emacs." "Copy-paste error?" nil t)
(melpazoid-misc "(fset" "Ensure this `fset` isn't being used as a surrogate `defalias`") ; nofmt
(melpazoid-misc "(fmakunbound" "`fmakunbound` should rarely occur in packages") ; nofmt
@ -215,6 +215,8 @@ a Docker container, e.g. kellyk/emacs does not include the .el files."
(melpazoid-misc "(ignore-errors (re-search-[fb]" "Use `re-search-*`'s NOERROR argument") ; nofmt
(melpazoid-misc "(ignore-errors (search-[fb]" "Use `search-*`'s NOERROR argument") ; nofmt
(melpazoid-misc "^ ;[^;]" "Single-line comments should usually begin with `;;`" nil t) ; nofmt
;; commentary
(melpazoid-misc "^;;; Commentary:\n;;\n" "Use empty lines instead of `;;` on a line by itself within your Commentary")
;; simplified conditionals
(melpazoid-misc "([<>eq/=]+ (point) (line-beginning-position))" "Could this point/point-at-bol comparison use `bolp`?") ; nofmt
(melpazoid-misc "([<>eq/=]+ (point) (line-end-position))" "Could this point/point-at-eol comparison use `eolp`?") ; nofmt