From ded2d1d79fd4e64cdca92a6a34992f23ea9b578f Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Tue, 10 Mar 2020 14:04:27 +0000
Subject: [PATCH] build system: source everything from $lib

No functional change so far.

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---
 example             |  8 +++++---
 xbatmon-simple-tray | 10 ++++++----
 2 files changed, 11 insertions(+), 7 deletions(-)

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
 }
-- 
2.30.2