Removed extraneous debugging code.

diff --git a/v7/src/edwin/rmailsrt.scm b/v7/src/edwin/rmailsrt.scm
index 8923dcfc2e3109c16dbbe63aa956b542ec4f197a..26c863ffce5f5b2e67bde8b8fa70dd4bb8ef35ee 100644 (file)
--- a/v7/src/edwin/rmailsrt.scm
+++ b/v7/src/edwin/rmailsrt.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;;    $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/rmailsrt.scm,v 1.3 1991/08/26 21:47:48 bal Exp $
+;;;    $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/rmailsrt.scm,v 1.4 1991/09/10 21:33:30 bal Exp $
 ;;;
 ;;;    Copyright (c) 1991 Massachusetts Institute of Technology
 ;;;
@@ -236,8 +236,6 @@ If prefix argument REVERSE is non-nil, sort them in reverse order."
 
 (define mail-strip-quoted-names
   (lambda (address)
-    (display address)
-    (newline)
     (let ((pos))
       (if (re-search-string-forward (re-compile-pattern "\\`[ \t\n]*" true)
                                   true false address)