unofficial mirror of emacs-devel@gnu.org 
 help / color / mirror / code / Atom feed
* Re: [Emacs-diffs] master a5e39bf: python.el: Fix mark-defun behavior (Bug#19665)
       [not found] ` <E1ZBxdj-0003EX-FX@vcs.savannah.gnu.org>
@ 2015-07-06 13:45   ` Stefan Monnier
  0 siblings, 0 replies; only message in thread
From: Stefan Monnier @ 2015-07-06 13:45 UTC (permalink / raw)
  To: emacs-devel; +Cc: Fabián Ezequiel Gallina

> +(defun python-mark-defun (&optional allow-extend)
> +  "Put mark at end of this defun, point at beginning.
> +The defun marked is the one that contains point or follows point.
> +
> +Interactively (or with ALLOW-EXTEND non-nil), if this command is
> +repeated or (in Transient Mark mode) if the mark is active, it
> +marks the next defun after the ones already marked."
> +  (interactive "p")
> +  (when (python-info-looking-at-beginning-of-defun)
> +    (end-of-line 1))
> +  (mark-defun allow-extend))

Could you suggest a way to improve the code of mark-defun so that this
remapping is not needed?


        Stefan



^ permalink raw reply	[flat|nested] only message in thread

only message in thread, other threads:[~2015-07-06 13:45 UTC | newest]

Thread overview: (only message) (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
     [not found] <20150706040419.12395.55528@vcs.savannah.gnu.org>
     [not found] ` <E1ZBxdj-0003EX-FX@vcs.savannah.gnu.org>
2015-07-06 13:45   ` [Emacs-diffs] master a5e39bf: python.el: Fix mark-defun behavior (Bug#19665) Stefan Monnier

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).