* lisp/tutorial.el: Use lexical-binding.

diff --git a/lisp/tutorial.el b/lisp/tutorial.el
index 57e5570d537abade857f0bb1651bd04ef0e36899..186bf35fe7e9c0a1ea4bf3ab06ff2069013fa88d 100644 (file)
--- a/lisp/tutorial.el
+++ b/lisp/tutorial.el
@@ -1,4 +1,4 @@
-;;; tutorial.el --- tutorial for Emacs
+;;; tutorial.el --- tutorial for Emacs  -*- lexical-binding: t -*-
 
 ;; Copyright (C) 2006-2021 Free Software Foundation, Inc.
 
@@ -25,10 +25,6 @@
 
 ;; Code for running the Emacs tutorial.
 
-;;; History:
-
-;; File was created 2006-09.
-
 ;;; Code:
 
 (require 'help-mode) ;; for function help-buffer
@@ -517,8 +513,8 @@ where
                           (list "more info" 'current-binding
                                 key-fun def-fun key where))
                     nil))
-           (add-to-list 'changed-keys
-                        (list key def-fun def-fun-txt where remark nil))))))
+            (push (list key def-fun def-fun-txt where remark nil)
+                  changed-keys)))))
     changed-keys))
 
 (defun tutorial--key-description (key)
@@ -768,7 +764,7 @@ Run the Viper tutorial? "))
        (if (fboundp 'viper-tutorial)
            (if (y-or-n-p (concat prompt1 prompt2))
                (progn (message "")
-                      (funcall 'viper-tutorial 0))
+                       (funcall #'viper-tutorial 0))
              (message "Tutorial aborted by user"))
          (message prompt1)))
     (let* ((lang (cond