[Bps-public-commit] r15223 - in Shipwright/trunk: bin

[sunnavy at bestpractical.com]

Author: sunnavy
Date: Mon Aug 18 11:31:55 2008
New Revision: 15223

Modified:
   Shipwright/trunk/   (props changed)
   Shipwright/trunk/bin/shipwright

Log:
 r15797 at sunnavys-mb:  sunnavy | 2008-08-18 23:00:39 +0800
 always exit with the "current dir" be the one before run


Modified: Shipwright/trunk/bin/shipwright
==============================================================================
--- Shipwright/trunk/bin/shipwright	(original)
+++ Shipwright/trunk/bin/shipwright	Mon Aug 18 11:31:55 2008
@@ -4,6 +4,10 @@
 use warnings;
 use Shipwright;
 use Shipwright::Script;
+use Cwd;
 
 local $SIG{INT} = sub { warn "Stopped\n"; exit; };
+
+my $cwd = getcwd;
 Shipwright::Script->dispatch();
+chdir $cwd;