[project @ 2005-07-05 18:48:49 by unknown_lamer]
[clinton/bobotpp.git] / scripts / uname
index d528892..f13bd8a 100644 (file)
@@ -1,4 +1,6 @@
-(use-modules (ice-9 popen))
+;;; -*- scheme -*-
+(use-modules (ice-9 popen)
+            (ice-9 redelim))
 
 (define (uname c)
   (let* ((p (open-input-pipe "/bin/uname -a"))