[Emacs-diffs] Changes to emacs/lisp/play/mpuz.el

[Romain Francoise]

Index: emacs/lisp/play/mpuz.el
diff -c emacs/lisp/play/mpuz.el:1.31 emacs/lisp/play/mpuz.el:1.32
*** emacs/lisp/play/mpuz.el:1.31        Mon Aug 15 21:29:32 2005
--- emacs/lisp/play/mpuz.el     Sat Sep 24 23:26:26 2005
***************
*** 400,406 ****
  (defun mpuz-offer-abort ()
    "Ask if user wants to abort current puzzle."
    (interactive)
!   (if (y-or-n-p "Abort game ")
        (let ((buf (mpuz-get-buffer)))
        (message "Mult Puzzle aborted.")
        (setq mpuz-in-progress nil
--- 400,406 ----
  (defun mpuz-offer-abort ()
    "Ask if user wants to abort current puzzle."
    (interactive)
!   (if (y-or-n-p "Abort game? ")
        (let ((buf (mpuz-get-buffer)))
        (message "Mult Puzzle aborted.")
        (setq mpuz-in-progress nil
***************
*** 444,450 ****
               (mpuz-ding t))
              (t
               (mpuz-try-proposal letter-char digit-char))))
!     (if (y-or-n-p "Start a new game ")
        (mpuz-start-new-game)
        (message "OK. I won't."))))
  
--- 444,450 ----
               (mpuz-ding t))
              (t
               (mpuz-try-proposal letter-char digit-char))))
!     (if (y-or-n-p "Start a new game? ")
        (mpuz-start-new-game)
        (message "OK. I won't."))))
  
***************
*** 489,495 ****
                               (t                       "not serious.")))))
      (message message)
      (sit-for 4)
!     (if (y-or-n-p (concat message "  Start a new game "))
        (mpuz-start-new-game)
        (message "Good Bye!"))))
  
--- 489,495 ----
                               (t                       "not serious.")))))
      (message message)
      (sit-for 4)
!     (if (y-or-n-p (concat message "  Start a new game? "))
        (mpuz-start-new-game)
        (message "Good Bye!"))))