diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2021-08-19 16:48:59 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2021-08-19 16:48:59 -0700 |
commit | 07fcbb558d797272b9f43547da60beda485873a3 (patch) | |
tree | 77d5da14e9f9d9d8b1d877c70c01296fd3893796 /lisp/tutorial.el | |
parent | c9bdeff3e45a7ac84a74a81bb048046f82dddc91 (diff) | |
parent | fb81c8c3adf8633f2f617c82f6019aef630860c7 (diff) | |
download | emacs-07fcbb558d797272b9f43547da60beda485873a3.tar.gz |
Merge remote-tracking branch 'origin/master' into athena/unstable
Diffstat (limited to 'lisp/tutorial.el')
-rw-r--r-- | lisp/tutorial.el | 12 |
1 files changed, 4 insertions, 8 deletions
diff --git a/lisp/tutorial.el b/lisp/tutorial.el index 57e5570d537..186bf35fe7e 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 |