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

[Stefan Kangas]

branch: master
commit e9e691093ab843911b0ac7a9a9188d477415db2e
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>

    * lisp/tutorial.el: Use lexical-binding.
---
 lisp/tutorial.el | 12 ++++--------
 1 file changed, 4 insertions(+), 8 deletions(-)

diff --git a/lisp/tutorial.el b/lisp/tutorial.el
index 57e5570..186bf35 100644
--- 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