X-Git-Url: https://git.netwichtig.de/gitweb/?a=blobdiff_plain;f=.inspircd.inc;h=5ac7e84ecec616eb22641e3798c30fcb6858c479;hb=9ea40ce2f7f7c5d55bf22e4b39e9903509925f1a;hp=cb59bc3cb47f5f50cf4b82343c538ed4baa337e0;hpb=ffe8c3ce60e83c48aa393fa718602c070f4149e2;p=user%2Fhenk%2Fcode%2Finspircd.git diff --git a/.inspircd.inc b/.inspircd.inc index cb59bc3cb..5ac7e84ec 100644 --- a/.inspircd.inc +++ b/.inspircd.inc @@ -15,6 +15,7 @@ # I HATE PERL.. kthxbye # --------------------------------------------------- +my $basepath = "@BASE_DIR@"; my $confpath = "@CONFIG_DIR@/"; my $binpath = "@BINARY_DIR@"; my $libpath = "@LIBRARY_DIR@"; @@ -60,6 +61,7 @@ if ($arg eq "cron") { if ($arg eq "restart") { stop(); + unlink($pidfile) if (-e $pidfile); start(); # kthxbye(); exit(); @@ -98,7 +100,7 @@ sub debug { checkgdb(); # If we are still alive here.. Try starting the IRCd.. - system("gdb --command=.gdbargs --args $binpath/$executable -nofork -debug -nolog"); + system("gdb --command=$basepath/.gdbargs --args $binpath/$executable -nofork -debug -nolog"); } sub screendebug @@ -113,7 +115,7 @@ sub screendebug # If we are still alive here.. Try starting the IRCd.. print "Starting InspIRCd in `screen`, type `screen -r` when the ircd crashes to view the gdb output and get a backtrace.\n"; print "Once you're inside the screen session press ^C + d to re-detach from the session\n"; - system("screen -m -d gdb --command=.gdbargs --args $binpath/$executable -nofork -debug -nolog"); + system("screen -m -d gdb --command=$basepath/.gdbargs --args $binpath/$executable -nofork -debug -nolog"); } sub valdebug