[evolvis-commits] r7438: Process SQL comments as such. ↵

mirabilos at evolvis.org mirabilos at evolvis.org
Thu Feb 24 15:41:15 CET 2011


Author: mirabilos
Date: 2011-02-24 15:41:15 +0100 (Thu, 24 Feb 2011)
New Revision: 7438

Modified:
   trunk/gforge_base/evolvisforge-5.1/gforge/deb-specific/db-upgrade26.pl
Log:
Process SQL comments as such.


Modified: trunk/gforge_base/evolvisforge-5.1/gforge/deb-specific/db-upgrade26.pl
===================================================================
--- trunk/gforge_base/evolvisforge-5.1/gforge/deb-specific/db-upgrade26.pl	2011-02-24 14:41:14 UTC (rev 7437)
+++ trunk/gforge_base/evolvisforge-5.1/gforge/deb-specific/db-upgrade26.pl	2011-02-24 14:41:15 UTC (rev 7438)
@@ -59,6 +59,7 @@
 	    
  	    foreach my $s (@reqlist) {
  		$query = $s ;
+		debug $query ;
   		$sth = $dbh->prepare ($query) ;
   		$sth->execute () ;
   		$sth->finish () ;
@@ -295,7 +296,9 @@
       
     PARSELOOP: while (1) {	# Parse a request
 
-	while ( ($l eq "") or ((! $inquote) and ($l =~ /^\s*$/)) ) {
+	while ( ($l eq "")
+		or ((! $inquote) and ($l =~ /^\s*$/))
+		or ((! $inquote) and ($l =~ /^--/)) ) {
 	    $l = <F> ;
 	    if ($l) {
  		chomp $l ;



More information about the evolvis-commits mailing list