diff options
author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-09-08 00:36:13 +0000 |
---|---|---|
committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-09-08 00:36:13 +0000 |
commit | 7880256bc58380f97d6ff10c05df005cbc3b07ab (patch) | |
tree | 2e18a3e1c3dedc293fb00b7f37e778df42b0c6df | |
parent | 4ecf09d99d3724e776d881e0151eeed379da7fb0 (diff) |
Prevented SL2LS.pl from clobbering ledger-smb as in bug 1554246
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@41 4979c152-3d1c-0410-bac9-87ea11338e46
-rwxr-xr-x | SL2LS.pl | 8 |
1 files changed, 6 insertions, 2 deletions
@@ -3,8 +3,12 @@ # Simple script. Right now, all that needs to be done is that the SL directory # needs to be deleted and the sql-ledger.conf needs to be renamed. -open (SL, "< sql-ledger.conf"); -open (LS, "> ledger-smb.conf"); +$filedie = "To install manually: +rename the sql-ledger.conf to ledger-smb.conf +Delete the SL directory (optional but HIGHLY recommended)\n"; +open (SL, "< sql-ledger.conf") || die ( +open (LS, "> ledger-smb.conf") || die { +"Could not open ledger-smb.conf: $! \n $filedie"); while ($line = <SL>){ print LS $line; |