1
0
mirror of https://github.com/janet-lang/janet synced 2025-10-31 07:33:01 +00:00

Support :has-exe as well

This is a companion change to spork's issue

As implemented, :has-been-script didn't quite
mean what was intended.  :has-exe should
be an improvement.

To prevent breakage, both :has-bin-script and
:has-exe should be supported for a while in
both spork and janet.  Eventually
:has-bin-script can be retired.
This commit is contained in:
sogaiu
2025-10-17 22:36:45 +09:00
parent 2204209133
commit 1018cb9cca

View File

@@ -4388,7 +4388,9 @@
(when check (when check
(do-hook module bundle-name :check man))) (do-hook module bundle-name :check man)))
(print "installed " bundle-name) (print "installed " bundle-name)
(when (get man :has-bin-script) (when (or (get man :has-exe)
# remove eventually
(get man :has-bin-script))
(def binpath (string (dyn *syspath*) s "bin")) (def binpath (string (dyn *syspath*) s "bin"))
(eprintf "executable files have been installed to %s" binpath)) (eprintf "executable files have been installed to %s" binpath))
(when (get man :has-man) (when (get man :has-man)
@@ -4528,7 +4530,8 @@
(default filename (last (string/split s src))) (default filename (last (string/split s src)))
(default chmod-mode 8r755) (default chmod-mode 8r755)
(os/mkdir (string (dyn *syspath*) s "bin")) (os/mkdir (string (dyn *syspath*) s "bin"))
(put manifest :has-bin-script true) (put manifest :has-exe true)
(put manifest :has-bin-script true) # remove eventually
(bundle/add-file manifest src (string "bin" s filename) chmod-mode)) (bundle/add-file manifest src (string "bin" s filename) chmod-mode))
(defn bundle/add-manpage (defn bundle/add-manpage