From d0d9f55b632717fccb605e0a204ebdd5ffe8608f Mon Sep 17 00:00:00 2001 From: Dmitry Gutov Date: Tue, 10 May 2016 02:53:20 +0300 Subject: [PATCH] Allow newlines inside cl function arglists * lisp/help.el (help-add-fundoc-usage): Allow newlines inside ARGLIST (bug#21839). --- lisp/help.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/help.el b/lisp/help.el index 061daacfdd3..72893754e1e 100644 --- a/lisp/help.el +++ b/lisp/help.el @@ -1395,7 +1395,7 @@ ARGLIST can also be t or a string of the form \"(FUN ARG1 ARG2 ...)\"." (if (< (- (match-end 0) (match-beginning 0)) 2) "\n" "") "\n\n") (if (stringp arglist) - (if (string-match "\\`[^ ]+\\(.*\\))\\'" arglist) + (if (string-match "\\`[^ ]+\\(\\(?:.\\|\n\\)*\\))\\'" arglist) (concat "(fn" (match-string 1 arglist) ")") (error "Unrecognized usage format")) (help--make-usage-docstring 'fn arglist))))) -- 2.39.2