aboutsummaryrefslogtreecommitdiffhomepage
path: root/bin/janet-pm
diff options
context:
space:
mode:
authorCalvin Rose <calsrose@gmail.com>2025-03-22 21:07:36 -0500
committerCalvin Rose <calsrose@gmail.com>2025-03-22 21:07:36 -0500
commitc7be962d911c5936a837ae3a49092c5f65aab55c (patch)
treedf3baa785cb5df225ec52b2640fba58f0f93ea3f /bin/janet-pm
parentFix up configuration on windows. (diff)
Make declare-executable work with MSVC correctly.
Diffstat (limited to 'bin/janet-pm')
-rwxr-xr-xbin/janet-pm10
1 files changed, 8 insertions, 2 deletions
diff --git a/bin/janet-pm b/bin/janet-pm
index b5d9bb0..dfcd9b7 100755
--- a/bin/janet-pm
+++ b/bin/janet-pm
@@ -292,12 +292,18 @@
# Break on help text
(unless ap (break))
(unless (ap :default) (break (help)))
+
+ # Flag Configuration
(when-let [local (get ap :local)]
(os/mkdir "jpm_tree")
- (put root-env *syspath* (os/realpath "jpm_tree")))
+ (os/mkdir "jpm_tree/man")
+ (os/mkdir "jpm_tree/bin")
+ (put root-env :binpath (path/abspath "jpm_tree/bin"))
+ (put root-env :manpath (path/abspath "jpm_tree/man"))
+ (put root-env *syspath* (path/abspath "jpm_tree")))
(when-let [sp (get ap :syspath)] (put root-env *syspath* sp))
- # Do configuration
+ # Env Vars Configuration
(pm-config/read-env-variables root-env)
(def [sub-command & command-args] (ap :default))