Changeset 320
- Timestamp:
- 07/09/2007 06:29:06 PM
- Files:
-
- trunk/script/vss2svn.pl (modified) (6 diffs)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
trunk/script/vss2svn.pl
r319 r320 912 912 913 913 my $sql2; 914 my $prefix; 914 915 915 916 # PIN only … … 923 924 . ' AND timestamp<=' . $row->{timestamp} 924 925 . ' ORDER BY version DESC'; 926 $prefix = "reverted changes for: \n"; 925 927 } 926 928 … … 937 939 } 938 940 939 # PIN/UNPIN940 if ( defined $row->{version} # noPIN version number941 # UNPIN/PIN 942 if ( defined $row->{version} # PIN version number 941 943 && defined $row->{info}) { # UNPIN version number 942 944 $sql2 = 'SELECT * FROM PhysicalAction' … … 946 948 . ' AND version>' . $row->{info} 947 949 . ' AND version<=' . $row->{version} 948 . ' ORDER BY version ASC'; 950 . ' ORDER BY version '; 951 952 if ($row->{info} > $row->{version}) { 953 $sql2 .= "DESC"; 954 $prefix = "reverted changes for: \n"; 955 } 956 else { 957 $sql2 .= "ASC"; 958 } 959 949 960 } 950 961 … … 969 980 970 981 if (defined $comment && !defined $row->{comment}) { 982 $comment = $prefix . $comment if defined $prefix; 971 983 $comment =~ s/"/""/g; 972 984 my $sql3 = 'UPDATE PhysicalAction SET comment="' . $comment . '" WHERE action_id = ' . $row->{action_id}; … … 1285 1297 trunk dirk : $gCfg{trunkdir} 1286 1298 label dir : $gCfg{labeldir} 1287 label mapper : $gCfg{labelmapper} 1299 label mapper : $gCfg{labelmapper} if defined $gCfg{labelmapper} 1288 1300 1289 1301 VSS2SVN ver : $VERSION
