From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Tue, 10 Mar 2020 14:04:27 +0000 (+0000)
Subject: build system: source everything from $lib
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ian/git?a=commitdiff_plain;h=ded2d1d79fd4e64cdca92a6a34992f23ea9b578f;p=chiark-tcl-applet.git

build system: source everything from $lib

No functional change so far.

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---

diff --git a/example b/example
index d783f3f..7cf6b15 100755
--- a/example
+++ b/example
@@ -14,9 +14,11 @@
 # eg, for a silly example:
 #   .../example xterm -id
 
-source applet.tcl
-source subproc.tcl
-source utils.tcl
+set lib .
+
+source $lib/applet.tcl
+source $lib/subproc.tcl
+source $lib/utils.tcl
 
 set debug::debug puts
 
diff --git a/xbatmon-simple-tray b/xbatmon-simple-tray
index 99619e9..72ed960 100755
--- a/xbatmon-simple-tray
+++ b/xbatmon-simple-tray
@@ -9,9 +9,11 @@
 #  xbatmon-simple-tray
 #    [WISH-OPTIONS... [-- TRAY-EMBED-OPTIONS... [-- XBATMON-SIMPLE-OPTIONS...]]]
 
-source subproc.tcl
-source utils.tcl
-source args.tcl
+set lib .
+
+source $lib/subproc.tcl
+source $lib/utils.tcl
+source $lib/args.tcl
 
 proc cmdline {id orientation} {
     global argv
@@ -199,7 +201,7 @@ proc tt-info {chan} {
 #----- modes -----
 
 proc mode/normal {} {
-    uplevel #0 source applet.tcl
+    uplevel #0 { source $lib/applet.tcl }
     applet::setup-subproc cmdline
     applet::setup-tooltip tt-show tt-invisible
 }