diff --git a/scsh/meta-arg.scm b/scsh/meta-arg.scm index fcfde69..26bd78e 100644 --- a/scsh/meta-arg.scm +++ b/scsh/meta-arg.scm @@ -56,15 +56,8 @@ (lambda (fname) (call-with-input-file fname (lambda (port) - (skip-char-set non-newline port) ; Skip the first - - ; WARNING JMG HACK - -; (read-char port) ; JMG this should kill the newline - ; but since skip-char-set is corrupt - ; (it eats the last char) - ; I omit the read-char to hack around - + (skip-char-set non-newline port) ; Skip the first line + (read-char port) ;read the newline (read-secondary-args port))))))