diff options
| -rwxr-xr-x | install.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/install.scm b/install.scm index 5346740..46ee7a2 100755 --- a/install.scm +++ b/install.scm @@ -95,7 +95,7 @@ (let ((src-path (expand-file src)) (target-path (replace (expand-file target) "dot-" "."))) (unless (and (symlink? target-path) (equal? (readlink target-path) src-path)) - (clean-file target-path dry-run) + (rm-tree target-path dry-run) (symlink src-path target-path) (log-msg 'OK (string-append " Symlink " src " -> " target))))) |