Update copyright year to 2015

[gnu-emacs] / lisp / calc / calc-graph.el

diff --git a/lisp/calc/calc-graph.el b/lisp/calc/calc-graph.el
index d5d8f0aaf35873b974d00dd685731dc779dc5e6d..20b0249ec1a15b1df26f2ca951c127db3e98f373 100644 (file)
--- a/lisp/calc/calc-graph.el
+++ b/lisp/calc/calc-graph.el
@@ -1,6 +1,6 @@
 ;;; calc-graph.el --- graph output functions for Calc
 
-;; Copyright (C) 1990-1993, 2001-2011 Free Software Foundation, Inc.
+;; Copyright (C) 1990-1993, 2001-2015 Free Software Foundation, Inc.
 
 ;; Author: David Gillespie <daveg@synaptics.com>
 ;; Maintainer: Jay Belanger <jay.p.belanger@gmail.com>
@@ -946,13 +946,14 @@ This \"dumb\" driver will be present in Gnuplot 3.0."
     (or calc-dumb-map
        (progn
          (setq calc-dumb-map (make-sparse-keymap))
-         (define-key calc-dumb-map "\n" 'scroll-up)
-         (define-key calc-dumb-map " " 'scroll-up)
-         (define-key calc-dumb-map "\177" 'scroll-down)
+         (define-key calc-dumb-map "\n" 'scroll-up-command)
+         (define-key calc-dumb-map " " 'scroll-up-command)
+         (define-key calc-dumb-map [?\S-\ ] 'scroll-down-command)
+         (define-key calc-dumb-map "\177" 'scroll-down-command)
          (define-key calc-dumb-map "<" 'scroll-left)
          (define-key calc-dumb-map ">" 'scroll-right)
-         (define-key calc-dumb-map "{" 'scroll-down)
-         (define-key calc-dumb-map "}" 'scroll-up)
+         (define-key calc-dumb-map "{" 'scroll-down-command)
+         (define-key calc-dumb-map "}" 'scroll-up-command)
          (define-key calc-dumb-map "q" 'exit-recursive-edit)
          (define-key calc-dumb-map "\C-c\C-c" 'exit-recursive-edit)))
     (use-local-map calc-dumb-map)