dunnet.el trivia

* play/dunnet.el (byte-compile-warnings): Don't disable them all.
(dun-unix-verbs): Remove dun-zippy.
(dun-zippy): Remove function.

2 files changed, 10 insertions, 5 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index da2c6a14afc..0e7b049ad9b 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,9 @@
 2013-05-28  Glenn Morris  <rgm@gnu.org>
 
+        * play/dunnet.el (byte-compile-warnings): Don't disable them all.
+        (dun-unix-verbs): Remove dun-zippy.
+        (dun-zippy): Remove function.
+
         * emacs-lisp/bytecomp.el (byte-compile-warnings): Doc fix.
 
 2013-05-27  Juri Linkov  <juri@jurta.org>
diff --git a/lisp/play/dunnet.el b/lisp/play/dunnet.el
index db525fe531f..9d48d36bb30 100644
--- a/lisp/play/dunnet.el
+++ b/lisp/play/dunnet.el
@@ -1,4 +1,4 @@
-;;; dunnet.el --- text adventure for Emacs -*-  byte-compile-warnings: nil -*-
+;;; dunnet.el --- text adventure for Emacs
 
 ;; Copyright (C) 1992-1993, 2001-2013 Free Software Foundation, Inc.
 
@@ -1386,7 +1386,7 @@ for a moment, then straighten yourself up.
 (setq dun-unix-verbs '((ls . dun-ls) (ftp . dun-ftp) (echo . dun-echo)
                        (exit . dun-uexit) (cd . dun-cd) (pwd . dun-pwd)
                        (rlogin . dun-rlogin) (uncompress . dun-uncompress)
-                       (cat . dun-cat) (zippy . dun-zippy)))
+                       (cat . dun-cat)))
 
 (setq dun-dos-verbs '((dir . dun-dos-dir) (type . dun-dos-type)
                       (exit . dun-dos-exit) (command . dun-dos-spawn)
@@ -2996,9 +2996,6 @@ drwxr-xr-x  3 root     staff          2048 Jan 1 1970 ..")
                 (dun-mprincl "Ascii files only.")
               (dun-mprincl "File not found."))))))))
 
-(defun dun-zippy (args)
-  (dun-mprincl (yow)))
-
 (defun dun-rlogin-endgame ()
   (if (not (= (dun-score nil) 90))
       (dun-mprincl
@@ -3356,3 +3353,7 @@ File not found")))
 (provide 'dunnet)
 
 ;;; dunnet.el ends here
+
+;; Local Variables:
+;; byte-compile-warnings: (not free-vars lexical)
+;; End: