# HG changeset patch
# User Vinicius Jose Latorre <viniciusjl@ig.com.br>
# Date 1192655434 0
# Node ID 2d9343a3760ebbf981d07d2a3ada78e85266de72
# Parent  31bc872ba784bd8c97e1ff84369ad2473be05fb0
Display message when tutorial position is not saved

diff -r 31bc872ba784 -r 2d9343a3760e lisp/ChangeLog
--- a/lisp/ChangeLog	Wed Oct 17 19:21:36 2007 +0000
+++ b/lisp/ChangeLog	Wed Oct 17 21:10:34 2007 +0000
@@ -1,3 +1,8 @@
+2007-10-17  Aaron Hawley  <aaronh@garden.org>
+
+	* tutorial.el (tutorial--save-tutorial): Display message when tutorial
+	position is not saved.
+
 2007-10-17  Chong Yidong  <cyd@stupidchicken.com>
 
 	* longlines.el (longlines-wrap-follows-window-size): Integer value
diff -r 31bc872ba784 -r 2d9343a3760e lisp/tutorial.el
--- a/lisp/tutorial.el	Wed Oct 17 19:21:36 2007 +0000
+++ b/lisp/tutorial.el	Wed Oct 17 21:10:34 2007 +0000
@@ -656,7 +656,8 @@
   ;; This runs in a hook so protect it:
   (condition-case err
       (if (y-or-n-p "Save your position in the tutorial? ")
-	  (tutorial--save-tutorial-to (tutorial--saved-file)))
+	  (tutorial--save-tutorial-to (tutorial--saved-file))
+	(message "Tutorial position not saved"))
     (error (message "Error saving tutorial state: %s"
 		    (error-message-string err)))))