]> git.eshelyaron.com Git - emacs.git/commit
vc-do-async-command: Ellipse later lines in multiline arguments
authorSean Whitton <spwhitton@spwhitton.name>
Sat, 12 Apr 2025 02:05:57 +0000 (10:05 +0800)
committerEshel Yaron <me@eshelyaron.com>
Sat, 12 Apr 2025 06:35:31 +0000 (08:35 +0200)
commitde53011093dc02bce2d0ee75713a0983c3bfa02a
treeb6a2ce2c990a0c5b86a0e1985795bc06bd16d9ad
parent665c16b593b03346e1daf449f2329d3a5f90ea16
vc-do-async-command: Ellipse later lines in multiline arguments

* lisp/emacs-lisp/cl-print.el (cl-print-expand-ellipsis): Bind
inhibit-read-only to t.
* lisp/vc/vc-dispatcher.el (require): Require cl-print at
compile time.
(vc-do-async-command): When printing command arguments that
contain multiple lines, use cl-prin1 with cl-print-string-length
bound in order to ellipse lines other than the first.
Switch the outer quotation marks to single quotation marks.

(cherry picked from commit 3b841700a8bef1d5b16542679458ddfb588ea777)
lisp/emacs-lisp/cl-print.el
lisp/vc/vc-dispatcher.el