*** simple.el	Sat Apr 21 11:49:22 2007
--- simple.el	Mon Apr 23 08:46:42 2007
***************
*** 3198,3208 ****
  	(message "Mark activated")))))

  (defcustom set-mark-command-repeat-pop nil
!   "*Non-nil means that repeating \\[set-mark-command] after popping will pop.
! This means that if you type C-u \\[set-mark-command] \\[set-mark-command]
  will pop twice."
    :type 'boolean
!   :group 'editing)

  (defun set-mark-command (arg)
    "Set the mark where point is, or jump to the mark.
--- 3198,3212 ----
  	(message "Mark activated")))))

  (defcustom set-mark-command-repeat-pop nil
!   "Non-nil means repeating \\[set-mark-command] jumps to next position on mark ring.
! If this variable is non-nil, repeating the \\[set-mark-command] command with no
! prefix argument pops the next position off the local \(or global)
! mark ring and jumps there.  Hence, typing \\[universal-argument] \
! \\[set-mark-command] followed by \\[set-mark-command]
  will pop twice."
    :type 'boolean
!   :version "22.1"
!   :group 'editing-basics)

  (defun set-mark-command (arg)
    "Set the mark where point is, or jump to the mark.