# This patch changes the location of the sbnc.tcl configuration and
# the script sources.

diff -Naur sbnc-1.2.orig/bnctcl/tickle.cpp sbnc-1.2/bnctcl/tickle.cpp
--- sbnc-1.2.orig/bnctcl/tickle.cpp	2007-05-20 17:48:34.000000000 +0200
+++ sbnc-1.2/bnctcl/tickle.cpp	2008-01-17 09:21:53.000000000 +0100
@@ -124,7 +124,7 @@
 
 		Tcl_Preserve(g_Interp);
 
-		Tcl_EvalFile(g_Interp, "./sbnc.tcl");
+		Tcl_EvalFile(g_Interp, "/etc/sbnc/sbnc.tcl");
 	}
 
 	bool InterceptIRCMessage(CIRCConnection* IRC, int argc, const char** argv) {
@@ -320,7 +320,7 @@
 public:
 	void RehashInterpreter(void) {
 		CallBinds(Type_PreRehash, NULL, NULL, 0, NULL);
-		Tcl_EvalFile(g_Interp, "./sbnc.tcl");
+		Tcl_EvalFile(g_Interp, "/etc/sbnc/sbnc.tcl");
 		CallBinds(Type_PostRehash, NULL, NULL, 0, NULL);
 	}
 };
diff -Naur sbnc-1.2.orig/sbnc.tcl sbnc-1.2/sbnc.tcl
--- sbnc-1.2.orig/sbnc.tcl	2006-06-17 19:15:03.000000000 +0200
+++ sbnc-1.2/sbnc.tcl	2008-01-17 09:26:20.000000000 +0100
@@ -3,17 +3,25 @@
 # use the tcl command 'rehash' (e.g. /sbnc tcl :rehash)
 
 # You should not modify this block
-source "scripts/alltools.tcl"
-source "scripts/namespace.tcl"
-source "scripts/timers.tcl"
-source "scripts/misc.tcl"
-source "scripts/variables.tcl"
-source "scripts/pushmode.tcl"
-source "scripts/channel.tcl"
-source "scripts/bind.tcl"
-source "scripts/usys.tcl"
-source "scripts/socket.tcl"
-source "scripts/botnet.tcl"
-source "scripts/iface2.tcl"
-source "scripts/ifacecmds.tcl"
-source "scripts/partyline.tcl"
+source "/usr/lib/sbnc/scripts/alltools.tcl"
+source "/usr/lib/sbnc/scripts/namespace.tcl"
+source "/usr/lib/sbnc/scripts/timers.tcl"
+source "/usr/lib/sbnc/scripts/misc.tcl"
+source "/usr/lib/sbnc/scripts/variables.tcl"
+source "/usr/lib/sbnc/scripts/pushmode.tcl"
+source "/usr/lib/sbnc/scripts/channel.tcl"
+source "/usr/lib/sbnc/scripts/bind.tcl"
+source "/usr/lib/sbnc/scripts/usys.tcl"
+source "/usr/lib/sbnc/scripts/socket.tcl"
+source "/usr/lib/sbnc/scripts/botnet.tcl"
+source "/usr/lib/sbnc/scripts/iface2.tcl"
+source "/usr/lib/sbnc/scripts/ifacecmds.tcl"
+source "/usr/lib/sbnc/scripts/partyline.tcl"
+
+# Examples for other useful scripts.
+# Uncomment them if you want to use it.
+#source "/usr/lib/sbnc/scripts/contact.tcl"
+#source "/usr/lib/sbnc/scripts/qauth.tcl"
+#source "/usr/lib/sbnc/scripts/version.tcl"
+#source "/usr/lib/sbnc/scripts/vhost.tcl"
+#source "/usr/lib/sbnc/scripts/virtual.tcl"