From 9a99847224b406851d3db3967c2e82ee8c1bb628 Mon Sep 17 00:00:00 2001
From: einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Fri, 16 Mar 2007 23:52:04 +0000
Subject: upgrade.pl now called upgrade-templates.pl

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/branches/1.2@918 4979c152-3d1c-0410-bac9-87ea11338e46
---
 upgrade.pl | 22 ----------------------
 1 file changed, 22 deletions(-)
 delete mode 100644 upgrade.pl

(limited to 'upgrade.pl')

diff --git a/upgrade.pl b/upgrade.pl
deleted file mode 100644
index d6befb4f..00000000
--- a/upgrade.pl
+++ /dev/null
@@ -1,22 +0,0 @@
-#!/usr/bin/perl
-
-my $dirpath = $ARGV[1];
-$dirpath ||= 'templates';
-
-&process_dir($dirpath);
-
-sub process_dir {
-	my $dirpath = shift @_;
-	opendir DIR, $dirpath || die "can't open dir $dirpath for reading:$!";
-	my @entries = readdir DIR;
-	closedir DIR;
-	for $entry(@entries){
-		my $path = "$dirpath/$entry";
-		if (-d $path && $entry !~ /^\./){
-			&process_dir($path);
-		} elsif  ($entry !~ /^\./){
-			print "Processing path $path\n";
-			`perl -ibak -pe 's|\<\%(.*)\%\>|<?lsmb \$1 ?>|g' $path`
-		}
-	}
-}
-- 
cgit v1.2.3