diff options
Diffstat (limited to 'lisp/play')
| -rw-r--r-- | lisp/play/bubbles.el | 10 | ||||
| -rw-r--r-- | lisp/play/dunnet.el | 44 | ||||
| -rw-r--r-- | lisp/play/gomoku.el | 2 | ||||
| -rw-r--r-- | lisp/play/morse.el | 2 |
4 files changed, 29 insertions, 29 deletions
diff --git a/lisp/play/bubbles.el b/lisp/play/bubbles.el index 2c4031056af..5ca792db310 100644 --- a/lisp/play/bubbles.el +++ b/lisp/play/bubbles.el @@ -101,31 +101,31 @@ and a shift mode." :group 'bubbles) (defun bubbles-set-game-easy () - "Set game theme to 'easy'." + "Set game theme to ‘easy’." (interactive) (setq bubbles-game-theme 'easy) (bubbles)) (defun bubbles-set-game-medium () - "Set game theme to 'medium'." + "Set game theme to ‘medium’." (interactive) (setq bubbles-game-theme 'medium) (bubbles)) (defun bubbles-set-game-difficult () - "Set game theme to 'difficult'." + "Set game theme to ‘difficult’." (interactive) (setq bubbles-game-theme 'difficult) (bubbles)) (defun bubbles-set-game-hard () - "Set game theme to 'hard'." + "Set game theme to ‘hard’." (interactive) (setq bubbles-game-theme 'hard) (bubbles)) (defun bubbles-set-game-userdefined () - "Set game theme to 'user-defined'." + "Set game theme to ‘user-defined’." (interactive) (setq bubbles-game-theme 'user-defined) (bubbles)) diff --git a/lisp/play/dunnet.el b/lisp/play/dunnet.el index 205189e8313..ba137f54d8c 100644 --- a/lisp/play/dunnet.el +++ b/lisp/play/dunnet.el @@ -894,7 +894,7 @@ to swim.") (dun-mprincl " endgame points out of a possible 110.") (if (= (dun-endgame-score) 110) (dun-mprincl -"\n\nCongratulations. You have won. The wizard password is 'moby'")))) +"\n\nCongratulations. You have won. The wizard password is ‘moby’")))) (defun dun-help (args) (dun-mprincl @@ -902,7 +902,7 @@ to swim.") Here is some useful information (read carefully because there are one or more clues in here): - If you have a key that can open a door, you do not need to explicitly - open it. You may just use 'in' or walk in the direction of the door. + open it. You may just use ‘in’ or walk in the direction of the door. - If you have a lamp, it is always lit. @@ -916,8 +916,8 @@ or more clues in here): If this happens, your score will decrease, and in many cases you can never get credit for it again. -- You can save your game with the 'save' command, and use restore it - with the 'restore' command. +- You can save your game with the ‘save’ command, and use restore it + with the ‘restore’ command. - There are no limits on lengths of object names. @@ -1053,7 +1053,7 @@ for a moment, then straighten yourself up. (if (not dun-endgame-questions) (progn (dun-mprincl "Your question is:") - (dun-mprincl "No more questions, just do 'answer foo'.") + (dun-mprincl "No more questions, just do ‘answer foo’.") (setq dun-correct-answer '("foo"))) (let (which i newques) (setq i 0) @@ -1464,8 +1464,8 @@ kept. The exit is to the west." "You are in a computer room. It seems like most of the equipment has been removed. There is a VAX 11/780 in front of you, however, with one of the cabinets wide open. A sign on the front of the machine -says: This VAX is named 'pokey'. To type on the console, use the -'type' command. The exit is to the east." +says: This VAX is named ‘pokey’. To type on the console, use the +‘type’ command. The exit is to the east." "Computer room" ) ( @@ -1475,7 +1475,7 @@ to the west, and a door leads to the south." ) ( "You are in a round, stone room with a door to the east. There -is a sign on the wall that reads: 'receiving room'." +is a sign on the wall that reads: ‘receiving room’." "Receiving room" ) ( @@ -1552,7 +1552,7 @@ northeast through the brush you can see the bear hangout." ( "The entrance to a cave is to the south. To the north, a road leads towards a deep lake. On the ground nearby there is a chute, with a sign -that says 'put treasures here for points'." +that says ‘put treasures here for points’." "Cave Entrance" ;28 ) ( @@ -1831,13 +1831,13 @@ starvation. Doors lead out to the south and east." ) ( "You are in some sort of maintenance room for the museum. There is a -switch on the wall labeled 'BL'. There are doors to the west and north." +switch on the wall labeled ‘BL’. There are doors to the west and north." "Maintenance room" ;87 ) ( "You are in a classroom where school children were taught about natural -history. On the blackboard is written, 'No children allowed downstairs.' -There is a door to the east with an 'exit' sign on it. There is another +history. On the blackboard is written, ‘No children allowed downstairs.’ +There is a door to the east with an ‘exit’ sign on it. There is another door to the west." "Classroom" ;88 ) @@ -1871,7 +1871,7 @@ a room to the northeast." ( "You are in another computer room. There is a computer in here larger than you have ever seen. It has no manufacturers name on it, but it -does have a sign that says: This machine's name is 'endgame'. The +does have a sign that says: This machine's name is ‘endgame’. The exit is to the southwest. There is no console here on which you could type." "Endgame computer room" ;95 @@ -1882,7 +1882,7 @@ type." ) ( "You have reached a question room. You must answer a question correctly in -order to get by. Use the 'answer' command to answer the question." +order to get by. Use the ‘answer’ command to answer the question." "Question room 1" ;97 ) ( @@ -1913,7 +1913,7 @@ a hallway leads to the south." ( "You have reached a dead end. There is a PC on the floor here. Above it is a sign that reads: - Type the 'reset' command to type on the PC. + Type the ‘reset’ command to type on the PC. A hole leads north." "PC area" ;104 ) @@ -2357,8 +2357,8 @@ nil)) 2 Megabytes of RAM onboard." "It looks like some kind of meat. Smells pretty bad." nil -"The paper says: Don't forget to type 'help' for help. Also, remember -this word: 'worms'" +"The paper says: Don't forget to type ‘help’ for help. Also, remember +this word: ‘worms’" "The statuette is of the likeness of Richard Stallman, the author of the famous EMACS editor. You notice that he is not wearing any shoes." nil @@ -2414,10 +2414,10 @@ flush handle is so clean that you can see your reflection in it." nil nil "The box has a slit in the top of it, and on it, in sloppy handwriting, is -written: 'For key upgrade, put key in here.'" +written: ‘For key upgrade, put key in here.’" nil -"It says 'express mail' on it." -"It is a 35 passenger bus with the company name 'mobytours' on it." +"It says ‘express mail’ on it." +"It is a 35 passenger bus with the company name ‘mobytours’ on it." "It is a large metal gate that is too big to climb over." "It is a HIGH cliff." "Unfortunately you do not know enough about dinosaurs to tell very much about @@ -2449,14 +2449,14 @@ nil (setq dun-endgame-questions '( ( -"What is your password on the machine called 'pokey'?" "robert") +"What is your password on the machine called ‘pokey’?" "robert") ( "What password did you use during anonymous ftp to gamma?" "foo") ( "Excluding the endgame, how many places are there where you can put treasures for points?" "4" "four") ( -"What is your login name on the 'endgame' machine?" "toukmond" +"What is your login name on the ‘endgame’ machine?" "toukmond" ) ( "What is the nearest whole dollar to the price of the shovel?" "20" "twenty") diff --git a/lisp/play/gomoku.el b/lisp/play/gomoku.el index 8e6165fa5e4..702376ce86e 100644 --- a/lisp/play/gomoku.el +++ b/lisp/play/gomoku.el @@ -977,7 +977,7 @@ If the game is finished, this command requests for another game." (move-to-column (+ gomoku-x-offset (* gomoku-square-width (1- x))))) (defun gomoku-plot-square (square value) - "Draw 'X', 'O' or '.' on SQUARE depending on VALUE, leave point there." + "Draw ‘X’, ‘O’ or ‘.’ on SQUARE depending on VALUE, leave point there." (or (= value 1) (gomoku-goto-square square)) (let ((inhibit-read-only t)) diff --git a/lisp/play/morse.el b/lisp/play/morse.el index 5352341ce73..bbd3e6bc970 100644 --- a/lisp/play/morse.el +++ b/lisp/play/morse.el @@ -144,7 +144,7 @@ (")" . "Close") ("@" . "At")) "NATO phonetic alphabet. -See ''International Code of Signals'' (INTERCO), United States +See “International Code of Signals” (INTERCO), United States Edition, 1969 Edition (Revised 2003) available from National Geospatial-Intelligence Agency at URL `http://www.nga.mil/'") |