with-cwd and create-symlink

[Ed Kademan <kademan@phz.com>]

I am using Solaris2.6.  There seems to be some weird interaction
between the `with-cwd' form and `create-symlink.'  In what follows
there is no directory entry named "new" in either /tmp or
/home/kademan/tmp initially.

  Welcome to scsh 0.6.1 (Combinatorial Algorithms)
  Type ,? for help.

  ;; This creates a symlink named "new" in /tmp as expected.
  > (with-cwd "/tmp" (create-symlink "old" "new"))

  ;; But now I can't seem to create a symlink in my default current
  ;; directory.
  > (run (pwd))
  /home/kademan/tmp
  0
  > (create-symlink "old" "new")

  Error: 17
         #{Procedure 11533 (create-symlink in scsh-level-0)}
         "new"
  1> 

  ;; However I can create the symlink if I am explicit about where it
  ;; goes.
  > (create-symlink "old" "/home/kademan/tmp/new")
  > 

-- 
Ed Kademan              508.651.3700
PHZ Capital Partners    508.653.1745 (fax)
321 Commonwealth Road   <kademan@phz.com>
Wayland, MA 01778