diff options
author | Ben Sima <ben@bsima.me> | 2020-04-28 15:10:25 -0700 |
---|---|---|
committer | Ben Sima <ben@bsima.me> | 2020-04-28 15:10:25 -0700 |
commit | ee15b2c09c2b85ee6ea99f4aa6f58191de9d535e (patch) | |
tree | a567dec36cf417eebd84ac170cbad3c6b3a12515 /Alpha | |
parent | ddf0ad355e05112df8c799fe092ee73c0889da80 (diff) |
Fix pwd
Diffstat (limited to 'Alpha')
-rw-r--r-- | Alpha/Shell.scm | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/Alpha/Shell.scm b/Alpha/Shell.scm index 3f52fd2..b00b174 100644 --- a/Alpha/Shell.scm +++ b/Alpha/Shell.scm @@ -22,9 +22,7 @@ (popen/close-pipe port) ret)) -(define (pwd) - (regexp-substitute/global - #f "/home/ben" (getcwd) 'pre "~" 'post)) +(define pwd getcwd) (define (ls) (ftw/scandir (getcwd))) |