1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
|
diff -ur work/lib/TWiki/Store.pm work-patched/lib/TWiki/Store.pm
--- work/lib/TWiki/Store.pm 2004-10-19 14:48:40.000000000 -0400
+++ work-patched/lib/TWiki/Store.pm 2005-09-16 07:19:40.000000000 -0400
@@ -572,7 +572,9 @@
}
$theRev = "" unless( $theRev );
- $theRev =~ s/^1\.//o;
+ $theRev =~ s/r?1\.//o; # cut 'r' and major
+ # Fix for Codev.SecurityAlertExecuteCommandsWithRev
+ $theRev = "" unless( $theRev =~ s/.*?([0-9]+).*/$1/o );
$topicHandler = _getTopicHandler( $theWebName, $theTopic, $attachment ) if( ! $topicHandler );
my( $rcsOut, $rev, $date, $user, $comment ) = $topicHandler->getRevisionInfo( $theRev );
diff -ur work/lib/TWiki/UI/RDiff.pm work-patched/lib/TWiki/UI/RDiff.pm
--- work/lib/TWiki/UI/RDiff.pm 2004-08-08 04:28:45.000000000 -0400
+++ work-patched/lib/TWiki/UI/RDiff.pm 2005-09-16 07:19:40.000000000 -0400
@@ -409,6 +409,9 @@
if( ! $rev2 ) { $rev2 = 0; }
$rev1 =~ s/r?1\.//go; # cut 'r' and major
$rev2 =~ s/r?1\.//go; # cut 'r' and major
+ # Fix for Codev.SecurityAlertExecuteCommandsWithRev
+ $rev1 = $maxrev unless( $rev1 =~ s/.*?([0-9]+).*/$1/o );
+ $rev2 = $maxrev unless( $rev2 =~ s/.*?([0-9]+).*/$1/o );
if( $rev1 < 1 ) { $rev1 = $maxrev; }
if( $rev1 > $maxrev ) { $rev1 = $maxrev; }
if( $rev2 < 1 ) { $rev2 = 1; }
diff -ur work/lib/TWiki/UI/View.pm work-patched/lib/TWiki/UI/View.pm
--- work/lib/TWiki/UI/View.pm 2004-08-25 02:36:15.000000000 -0400
+++ work-patched/lib/TWiki/UI/View.pm 2005-09-16 07:19:40.000000000 -0400
@@ -106,6 +106,8 @@
$revdate = TWiki::formatTime( $revdate );
if( $rev ) {
+ # Fix for Codev.SecurityAlertExecuteCommandsWithRev
+ $rev = $maxrev unless( $rev =~ s/.*?([0-9]+).*/$1/o );
$rev =~ s/r?1\.//go; # cut 'r' and major
if( $rev < 1 ) { $rev = 1; }
if( $rev > $maxrev ) { $rev = $maxrev; }
diff -ur work/lib/TWiki/UI/Viewfile.pm work-patched/lib/TWiki/UI/Viewfile.pm
--- work/lib/TWiki/UI/Viewfile.pm 2004-05-29 02:51:35.000000000 -0400
+++ work-patched/lib/TWiki/UI/Viewfile.pm 2005-09-16 07:19:40.000000000 -0400
@@ -43,6 +43,9 @@
my $fileName = $query->param( 'filename' );
my $rev = $query->param( 'rev' ) || "";
+ $rev =~ s/r?1\.//o; # cut 'r' and major
+ # Fix for Codev.SecurityAlertExecuteCommandsWithRev
+ $rev = "" unless( $rev =~ s/.*?([0-9]+).*/$1/o );
return unless TWiki::UI::webExists( $webName, $topic );
|
GitWeb
