instow

:)
git clone https://git.sr.ht/~ashymad/instow
Log | Files | Refs | LICENSE

commit 94e96341705029e3048c5057117a8c610bca04d0
parent 3ead529067e87ac59e6016d0581fdf48c75cf39a
Author: Szymon Mikulicz <szymon.mikulicz@posteo.net>
Date:   Sat, 18 Jul 2026 09:34:25 +0200

Name after a subdir

Diffstat:
Msrc/main.janet | 8++++++--
1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/src/main.janet b/src/main.janet @@ -94,8 +94,12 @@ (def stowdir (path/join target "stow")) (def srcdir (string/slice (procout "git" "rev-parse" "--show-toplevel") 0 -2)) (def srcsubdir (os/cwd)) - (os/cd srcdir) - (def pkg (libc/basename srcdir)) + (def pkg (if (= srcsubdir srcdir) + (libc/basename srcdir) + (do + (os/cd srcdir) + (string/join [(libc/basename srcdir) + (libc/basename srcsubdir)] "::"))) (def pkgdir (path/join stowdir pkg)) (def destdir (libc/mkdtemp "/tmp/instow.XXXXXX"))