Fix for: Re: Why is dump-scsh-program failing here?

I haven't been able to test this, since I wasn't able to rebuild scsh
(not having scheme48 0.53), but Taylor Campbell suggests this fix:

diff -bu /usr/local/src/langs/scheme/scsh-0.6.7/scsh/startup.scm\~ /usr/local/src/langs/scheme/scsh-0.6.7/scsh/startup.scm
--- /usr/local/src/langs/scheme/scsh-0.6.7/scsh/startup.scm~	2006-04-05 00:54:00.000000000 -0700
+++ /usr/local/src/langs/scheme/scsh-0.6.7/scsh/startup.scm	2006-05-19 12:43:06.000000000 -0700
@@ -27,9 +27,12 @@
     (newline (command-output))
     ;JMG: it is set to #f in the vm, so I omit it now
 ;;;(flush-the-symbol-table!)	;Gets restored at next use of string->symbol
+    (with-resources-aligned
+     (list cwd-resource)
+     (lambda ()
     (write-image filename
 		 (scsh-stand-alone-resumer start)
-		 "Scsh 0.6")
+                    "Scsh 0.6")))
     #t))
 
 

Diff finished.  Fri May 19 15:12:05 2006

-- 
There is such a thing as American-ness.  ... [H]ackers ... come
closest of any group I know to embodying it.  Closer, probably, than
the men running our government.
        -- Paul Graham