Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-23 21:37:34 +00:00
Code Issues Projects Releases Packages Wiki Activity

Fix edge case with single argument for rcirc-define-command

Browse source 
* rcirc.el (rcirc-define-command): Update regular expression generator
This commit is contained in:
Philip Kaludercic 2021-06-15 23:44:56 +02:00
parent 7e5360f322
commit b5d935bb7f
1 changed files with 5 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
lisp/net/rcirc.el
View file

@ -2403,12 +2403,12 @@ that, an interactive form can specified."
(insert "\\`")
(when arguments
(dotimes (_ (1- (length arguments)))
(insert "\\(?:\\(.+?\\)"))
(insert "\\(?:[[:space:]]+\\(.*\\)\\)")
(insert "\\(?:\\(.+?\\)[[:space:]]+"))
(dotimes (i (1- (length arguments)))
(when (< i optional)
(insert "?"))
(insert "\\)")))
(if (< i optional)
(insert "\\)?")
(insert "\\)"))))
(insert "\\(.*?\\)")
(insert "[[:space:]]*\\'")
(buffer-string)))
(argument (gensym))