|
From: | Richard Copley |
Subject: | Re: [Emacs-diffs] master b88e7c8: Make transpose-regions interactive (Bug#30343) |
Date: | Thu, 15 Mar 2018 20:20:19 +0000 |
> From: Stefan Monnier <address@hidden>
> Date: Sun, 11 Mar 2018 12:05:11 -0400
> Cc: "Charles A. Roelli" <address@hidden>
>
> > -DEFUN ("transpose-regions", Ftranspose_regions, Stranspose_regions, 4, 5, 0,
> > +DEFUN ("transpose-regions", Ftranspose_regions, Stranspose_regions, 4, 5,
> > + "(if (< (length mark-ring) 2)\
> > + (error \"Other region must be marked before transposing two regions\")\
> > + (let* ((num (if current-prefix-arg\
> > + (prefix-numeric-value current-prefix-arg)\
> > + 0))\
> > + (ring-length (length mark-ring))\
> > + (eltnum (mod num ring-length))\
> > + (eltnum2 (mod (1+ num) ring-length)))\
> > + (list (point) (mark) (elt mark-ring eltnum) (elt mark-ring eltnum2))))",
>
> Am I the only one who dislikes seeing such Elisp code hidden within our
> C files?
I have no problems with that.
[Prev in Thread] | Current Thread | [Next in Thread] |