[Qsos-commits] qsos/tools/createemptysheet createemptysheet.pl

[Goneri Le Bouder]

CVSROOT:        /sources/qsos
Module name:    qsos
Changes by:     Goneri Le Bouder <goneri>       07/06/28 10:33:18

Modified files:
        tools/createemptysheet: createemptysheet.pl 

Log message:
        fix a problem with the <include section="XXX"></include>

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/qsos/tools/createemptysheet/createemptysheet.pl?cvsroot=qsos&r1=1.6&r2=1.7

Patches:
Index: createemptysheet.pl
===================================================================
RCS file: /sources/qsos/qsos/tools/createemptysheet/createemptysheet.pl,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -b -r1.6 -r1.7
--- createemptysheet.pl 6 Apr 2007 12:30:47 -0000       1.6
+++ createemptysheet.pl 28 Jun 2007 10:33:18 -0000      1.7
@@ -57,7 +57,7 @@
 close QTPL;
 
 while (my $line = shift @buff) {
-  if ($line =~ /<include\W+section="([-\w]+)"\W*(|\/)>/) { # this is an include
+  if ($line =~ /<include\W+section="([-\w]+)"\W*(|\/)>/ || $line =~ 
/<include\W+section="([-\w]+)"\W*>\W*<\/include>/) { # this is an include
     if ($lang ne 'en' && -f "$includedir/$1_$lang.qin" ) {
       open INCLUDE, "<$includedir/$1_$lang.qin" or die "Failed to open ".
       "localised includefile"