emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

dev: fix off-by-one for line length rule

Browse source
This commit is contained in:
Henrik Lissner 2021-08-04 10:44:14 -04:00
parent f74debdea8
commit a3f917c42d
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
core/cli/ci.el
View file

@ -95,13 +95,13 @@
(cons (lambda ()
(catch 'found
(unless (looking-at "\\(bump\\|revert\\|merge\\)")
(while (re-search-forward "^[^\n]\\{72,\\}" nil t)
(while (re-search-forward "^[^\n]\\{73,\\}" nil t)
;; Exclude ref lines, bump lines, or lines with URLs
(save-excursion
(or (re-search-backward "^\\(Ref\\|Close\\|Fix\\|Revert\\) " nil t)
(let ((bump-re "\\(https?://.+\\|[^/]+\\)/[^/]+@[a-z0-9]\\{12\\}"))
(re-search-backward (format "^%s -> %s$" bump-re bump-re) nil t))
(re-search-backward "https?://[^ ]+\\{72,\\}" nil t)
(re-search-backward "https?://[^ ]+\\{73,\\}" nil t)
(throw 'found t)))))))
"Body line length exceeds 72 characters")