diff options
Diffstat (limited to 'src/fpm/installer.f90')
| -rw-r--r-- | src/fpm/installer.f90 | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/src/fpm/installer.f90 b/src/fpm/installer.f90 index d01bd27..70426d5 100644 --- a/src/fpm/installer.f90 +++ b/src/fpm/installer.f90 @@ -61,7 +61,7 @@ module fpm_installer character(len=*), parameter :: default_prefix_unix = "/usr/local" !> Default name of the installation prefix on Windows platforms - character(len=*), parameter :: default_prefix_win = "C:\" + character(len=*), parameter :: default_prefix_win = "C:\fpm" !> Copy command on Unix platforms character(len=*), parameter :: default_copy_unix = "cp" @@ -150,9 +150,12 @@ contains prefix = default_prefix_unix end if else - call env_variable(home, "APPDATA") + call env_variable(home, "LOCALAPPDATA") + if (.not. allocated(home)) then + call env_variable(home, "APPDATA") + end if if (allocated(home)) then - prefix = join_path(home, "local") + prefix = join_path(home, "fpm") else prefix = default_prefix_win end if |