Просмотр исходного кода

Ignore small changes in video number (unless RENAME is active)

Zachary Kotlarek 12 лет назад
Родитель
Сommit
b846e6b5ee
1 измененных файлов с 7 добавлено и 2 удалено
  1. 7 2
      yt/subscribe.pl

+ 7 - 2
yt/subscribe.pl

@@ -178,11 +178,16 @@ foreach my $id (keys(%{$videos})) {
 
 	# Warn (and optionally rename) if the video numbers drift
 	if (exists($files->{$id}) && $files->{$id}->{'number'} != $videos->{$id}->{'number'}) {
-		warn('Video ' . $id . ' had video number ' . $files->{$id}->{'number'} . ' but now has video number ' . $videos->{$id}->{'number'} . "\n");
 		if ($RENAME) {
 			print STDERR 'Renaming ' . $files->{$id}->{'path'} . ' => ' . $basePath . $files->{$id}->{'suffix'} . "\n";
 			rename($files->{$id}->{'path'}, $basePath . $files->{$id}->{'suffix'});
-			rename($files->{$id}->{'nfo'}, $nfo);
+			rename($files->{$id}->{'nfo'},  $nfo);
+		} else {
+
+			# Ignore small changes
+			if (abs($files->{$id}->{'number'} - $videos->{$id}->{'number'}) > 2 || $DEBUG) {
+				print STDERR 'Video ' . $id . ' had video number ' . $files->{$id}->{'number'} . ' but now has video number ' . $videos->{$id}->{'number'} . "\n";
+			}
 		}
 	}