*** sign.el.org	Wed Dec 15 18:35:18 1999
--- sign.el	Wed Jan  5 16:49:18 2000
***************
*** 341,347 ****
    (set-mark (point))			;(push-mark nil)
    (setq sign-new-point (point))
    (forward-char)
!   (copy-region-as-kill (mark) (point))
    (backward-char)
    (pop-to-buffer sign-root-buffer)
    (yank)
--- 341,347 ----
    (set-mark (point))			;(push-mark nil)
    (setq sign-new-point (point))
    (forward-char)
!   (copy-region-as-kill sign-new-point (point))
    (backward-char)
    (pop-to-buffer sign-root-buffer)
    (yank)