diff options
author | Chris Young <chris@unsatisfactorysoftware.co.uk> | 2010-07-13 23:07:38 +0000 |
---|---|---|
committer | Chris Young <chris@unsatisfactorysoftware.co.uk> | 2010-07-13 23:07:38 +0000 |
commit | c4600695c5a392fe789eea1bb49ce273a3402abc (patch) | |
tree | 465d7651cc37f221773379dff259bb8ca8d603b3 /amiga/dist | |
parent | 12df55d0950b58f716a01f276905cb74fe55ce2c (diff) | |
download | netsurf-c4600695c5a392fe789eea1bb49ce273a3402abc.tar.gz netsurf-c4600695c5a392fe789eea1bb49ce273a3402abc.tar.bz2 |
Fix first time installs in novice mode so the files end up in a directory rather than
the root of whichever volume Installer decided to pick.
svn path=/trunk/netsurf/; revision=10633
Diffstat (limited to 'amiga/dist')
-rwxr-xr-x | amiga/dist/Install | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/amiga/dist/Install b/amiga/dist/Install index b8afc8d1d..79ce6d29a 100755 --- a/amiga/dist/Install +++ b/amiga/dist/Install @@ -245,6 +245,22 @@ (set @default-dest (getenv "AppPaths/NetSurf")) +; If env-var did not exist, this is a first time install. +; For novice users we must take care to put the files somewhere sensible. +(if (= @default-dest "") + ( + ; Workaround for Installer bug picking TEXTCLIP: as a sensible location + (if (= @default-dest "TextClip:") (set @default-dest "SYS:Utilities")) + + (if (= @user-level 0) + ( + (makedir (tackon @default-dest "NetSurf") (infos)) + (set @default-dest (tackon @default-dest "NetSurf")) + ) + ) + ) +) + (set @default-dest (askdir (prompt "Where would you like to install NetSurf?\n" |