[Koha-cvs] koha/misc sync_koha_plugin.pl

[Joshua Ferraro]

CVSROOT:	/sources/koha
Module name:	koha
Branch: 	
Changes by:	Joshua Ferraro <kados at savannah.gnu.org>	06/03/31 22:32:49

Modified files:
	misc           : sync_koha_plugin.pl 

Log message:
	Create symlink from intranet/zebra to head zebra directory

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/koha/misc/sync_koha_plugin.pl.diff?tr1=1.3&tr2=1.4&r1=text&r2=text

Patches:
Index: koha/misc/sync_koha_plugin.pl
diff -u koha/misc/sync_koha_plugin.pl:1.3 koha/misc/sync_koha_plugin.pl:1.4
--- koha/misc/sync_koha_plugin.pl:1.3	Fri Mar 31 22:25:58 2006
+++ koha/misc/sync_koha_plugin.pl	Fri Mar 31 22:32:49 2006
@@ -1,6 +1,7 @@
 #!/usr/bin/perl -w
 
 use strict;
+use C4::Context;
 use Getopt::Long;
 
 my %opt = ();
@@ -137,6 +138,13 @@
     $opt{head_dir}.'/misc/zebra/usmarc/record.abs'
 );
 
+## Create symlink from intranet/zebra to head zebra directory
+system(
+    'ln',
+    '-s',
+    $opt{head_dir}.'/misc/zebra/usmarc',
+    C4::Context->config("intranetdir").'/zebra'
+);
 
 print "Finished\n\nRemember, you still need to: