[TWiki-Dev] [SVN] HaraldJoerg r30320 - twiki/trunk/BackupRestorePlugin/lib/TWiki/Plugins/BackupRestorePlugin

[<de...@de...>]

Author: HaraldJoerg
Date: 2017-04-07 19:11:53 +0000 (Fri, 07 Apr 2017)
New Revision: 30320
Trac url: http://develop.twiki.org/trac/changeset/30320

Modified:
   twiki/trunk/BackupRestorePlugin/lib/TWiki/Plugins/BackupRestorePlugin/Core.pm
Log:
Item7798: Escape left braces in regex (BackupRestorePlugin)

Modified: twiki/trunk/BackupRestorePlugin/lib/TWiki/Plugins/BackupRestorePlugin/Core.pm
===================================================================
--- twiki/trunk/BackupRestorePlugin/lib/TWiki/Plugins/BackupRestorePlugin/Core.pm	2017-04-07 19:04:39 UTC (rev 30319)
+++ twiki/trunk/BackupRestorePlugin/lib/TWiki/Plugins/BackupRestorePlugin/Core.pm	2017-04-07 19:11:53 UTC (rev 30320)
@@ -811,7 +811,7 @@
     my $file = "$baseDir/data/$web/$topic.txt";
     my $dest = "$destDir/$topic.txt";
     my $text = _readFile( $file, 1 ); # read topic meta
-    if( $text =~ /\%META\:TOPICINFO{[^\n]* date=\"([0-9]+)\"/ ) {
+    if( $text =~ /\%META\:TOPICINFO\{[^\n]* date=\"([0-9]+)\"/ ) {
         $timestamp = $1; # use timestamp of topic meta if found
     }
     unlink( $dest ) if( -e $dest );