changeset 61150:20dc81ce84e7

(cua-scroll-down): Add CUA property.
author Kim F. Storm <storm@cua.dk>
date Wed, 30 Mar 2005 22:20:24 +0000
parents 91810eae6151
children be58652085b8
files lisp/emulation/cua-base.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emulation/cua-base.el	Wed Mar 30 22:20:08 2005 +0000
+++ b/lisp/emulation/cua-base.el	Wed Mar 30 22:20:24 2005 +0000
@@ -1016,7 +1016,7 @@
 	(scroll-down arg)
       (beginning-of-buffer (goto-char (point-min)))))))
 
-(put 'cua-scroll-up 'CUA 'move)
+(put 'cua-scroll-down 'CUA 'move)
 
 ;;; Cursor indications