Fixup ignored variables.

diff --git a/src/6001/floppy.scm b/src/6001/floppy.scm
index 8c475fdea6c0fb5c8bb49332b16f73b844f84c82..dbd02aea403e047f37990a329da18b88eb0dd4eb 100644 (file)
--- a/src/6001/floppy.scm
+++ b/src/6001/floppy.scm
@@ -799,7 +799,6 @@ M-x rename-file, or use the `r' command in Dired.")
   (make-condition-type 'FLOPPY-ERROR condition-type:error
       '(COMMAND OUTPUT)
     (lambda (condition port)
-      condition
       (write-string "An error occurred while accessing the floppy.\n" port)
       (write-string "The command being executed was:\n\n" port)
       (write-string (floppy-error/command condition) port)