12 files changed, 8 insertions(+), 4 deletions(-)

R cap.tcl => src/cap.tcl
R db/main.tcl => src/db/main.tcl
R irc.tcl => src/irc.tcl
R irc/main.tcl => src/irc/main.tcl
R main.tcl => src/main.tcl
R migrate_core.tcl => src/migrate_core.tcl
R plugins.tcl => src/plugins.tcl
R spdx/dump.tcldict.gz => src/spdx/dump.tcldict.gz
R spdx/gen.tcl => src/spdx/gen.tcl
R spdx/lib.tcl => src/spdx/lib.tcl
R threads.tcl => src/threads.tcl
R ui/main.tcl => src/ui/main.tcl

@@ 2,6 2,10 @@
 
 set path [file dirname [dict get [info frame 0] file]]
 set version v0.0.1
+proc src {file} {
+  global path
+  uplevel [list source [file join $path $file]]
+}
 
 package require Thread
 thread::id; # avoid use-after-free


@@ 12,7 16,7 @@ package require sqlite3
 ${log}::info "tclircc $version <https://amehut.dev/~aleteoryx/tclircc>"
 ${log}::info "running from $path"
 
-source threads.tcl
+src threads.tcl
 
 proc on_threads_update {} {
   puts "threads updated!"


@@ 43,14 47,14 @@ start_thread db
 
 thread::send [t::ns tclircc::db] {path_to_core} core_db_path
 sqlite3 core_db $core_db_path -create true -fullmutex true
-source migrate_core.tcl
+src migrate_core.tcl
 
-source plugins.tcl
+src plugins.tcl
 
 start_thread irc
 start_thread ui
 
-plugins::load [file join $path testplugin]
+plugins::load [file join $path .. testplugin]
 
 ${log}::debug "opening initial window..."
 t::exec tclircc::ui {