Import Debian changes 2c7-1debian/2c7-1

slib (2c7-1) unstable; urgency=low

  * New upstream.
  * Add slibconfig back in.

slib (2c6-2) unstable; urgency=low

  * Remove the slib$(VERSION).info file.  Cut the diff back down to
    size. 

slib (2c6-1) unstable; urgency=low

  * New upstream.
  * Move docs to /usr/share. Up standards version. add /usr/doc symlink.
    Move info files.  Remove undocumented link.

slib (2c5-6) unstable; urgency=low

  * Lowercase two vars in yasyn.scm (Fixes bug #37222)

slib (2c5-5) unstable; urgency=low

  * Fix it so string-index isn't defined (now there is a
    strsrch:string-index) (Fixes #38812)

slib (2c5-4) unstable; urgency=low

  * Don't run slibconfig in postinst.  (Fixes bug #38253, #37733, #37715,
    #37746,  #37809, #37917, #38123, #38462)

slib (2c5-3) unstable; urgency=low

  * Run slibconfig in postinst.  It was commented out there, but I don't
    see any old bug reports on why it was commented out, so let's try
    again. :)  (Fixes bug #37221)

slib (2c5-2) unstable; urgency=low

  * Link mklibcat.scm to mklibcat.  Fixes a problem with using slib with
    guile. 

slib (2c5-1) unstable; urgency=low

  * New upstream.

slib (2c3-4) unstable; urgency=low

  * New maintainer.

1 files changed, 4 insertions, 2 deletions

diff --git a/debug.scm b/debug.scm
index 08406a9..58f6b03 100644
--- a/debug.scm
+++ b/debug.scm
@@ -19,12 +19,12 @@
 
 (require 'trace)
 (require 'break)
+(require 'line-i/o)
 
 (define (for-each-top-level-definition-in-file file proc)
   (call-with-input-file
       file
-    (lambda
-	(port)
+    (lambda (port)
       (letrec
 	  ((walk
 	    (lambda (exp)
@@ -45,6 +45,8 @@
 		  ((defmacro define-syntax) "should do something clever here")
 		  ((define)
 		   (proc exp))))))))
+	(if (eqv? #\# (peek-char port))
+	    (read-line port))		;remove `magic-number'
 	(do ((form (read port) (read port)))
 	    ((eof-object? form))
 	  (walk form))))))