diff options
author | Lars Ingebrigtsen <larsi@gnus.org> | 2021-11-04 23:16:47 +0100 |
---|---|---|
committer | Lars Ingebrigtsen <larsi@gnus.org> | 2021-11-04 23:16:47 +0100 |
commit | 4cf7af5a2a9aecb067d95b96a5965cc74627e86b (patch) | |
tree | c81cfd27dd32949c48727fc36f2cf8f106de1e0f /test/lisp/emacs-lisp | |
parent | cb9f3e1158a7b3cf556bdeeb5c4ba5896279a573 (diff) | |
download | emacs-4cf7af5a2a9aecb067d95b96a5965cc74627e86b.tar.gz emacs-4cf7af5a2a9aecb067d95b96a5965cc74627e86b.tar.bz2 emacs-4cf7af5a2a9aecb067d95b96a5965cc74627e86b.zip |
Tweak multi-line expressions in pp--format-function
* lisp/emacs-lisp/pp.el (pp--format-function): Fix up multi-line
expressions.
Diffstat (limited to 'test/lisp/emacs-lisp')
-rw-r--r-- | test/lisp/emacs-lisp/pp-resources/code-formats.erts | 13 |
1 files changed, 12 insertions, 1 deletions
diff --git a/test/lisp/emacs-lisp/pp-resources/code-formats.erts b/test/lisp/emacs-lisp/pp-resources/code-formats.erts index f48e262f69d..c2733d84dae 100644 --- a/test/lisp/emacs-lisp/pp-resources/code-formats.erts +++ b/test/lisp/emacs-lisp/pp-resources/code-formats.erts @@ -40,7 +40,8 @@ Name: code-formats3 (let ((a 1) (b 2)) (zot-zot-zot-zot-zot-zot 1 2 (funcall - bar-bar-bar-bar-bar-bar-bar-bar-bar-bar 2)))) + bar-bar-bar-bar-bar-bar-bar-bar-bar-bar + 2)))) =-=-= @@ -103,3 +104,13 @@ Name: code-formats9 (interactive) 1) =-=-= + + +Name: code-formats10 + +=-= +(funcall foo (concat "zot" (if (length> site 0) site + "bar") + "+" + (string-replace " " "+" query))) +=-=-= |