Mercurial > emacs

comparison lisp/simple.el @ 77459:203581a4dee8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(set-mark-command-repeat-pop): Doc fix.
author Richard M. Stallman <rms@gnu.org>
date Mon, 23 Apr 2007 21:15:07 +0000
parents 9f725c1d891f
children fad036526993
comparison
equal deleted inserted replaced
77458:d0abec2d45b5 77459:203581a4dee8
3196 (run-hooks 'activate-mark-hook) 3196 (run-hooks 'activate-mark-hook)
3197 (unless nomsg 3197 (unless nomsg
3198 (message "Mark activated"))))) 3198 (message "Mark activated")))))
3199 3199
3200 (defcustom set-mark-command-repeat-pop nil 3200 (defcustom set-mark-command-repeat-pop nil
3201 "*Non-nil means that repeating \\[set-mark-command] after popping will pop. 3201 "*Non-nil means repeating \\[set-mark-command] after popping mark pops it again.
3202 This means that if you type C-u \\[set-mark-command] \\[set-mark-command] 3202 That means that C-u \\[set-mark-command] \\[set-mark-command]
3203 will pop twice." 3203 will pop the mark twice, and
3204 C-u \\[set-mark-command] \\[set-mark-command] \\[set-mark-command]
3205 will pop the mark three times.
3206
3207 nil means \\[set-mark-command]'s behavior does not change
3208 after C-u \\[set-mark-command]."
3204 :type 'boolean 3209 :type 'boolean
3205 :group 'editing) 3210 :group 'editing)
3206 3211
3207 (defun set-mark-command (arg) 3212 (defun set-mark-command (arg)
3208 "Set the mark where point is, or jump to the mark. 3213 "Set the mark where point is, or jump to the mark.