소스 검색

Only whine about failed saves in DEBUG

Zachary Kotlarek 9 년 전
부모
커밋
b770a3fc55
1개의 변경된 파일과 3개의 추가작업 그리고 1개의 파일을 삭제
  1. 3 1
      Fetch.pm

+ 3 - 1
Fetch.pm

@@ -641,7 +641,9 @@ sub save() {
 	# Bail on bad HTTP result codes (if we're checking)
 	if (!$params{'nocheck'}) {
 		if ($self->Fetch::status_code() != 200) {
-			print STDERR "Fetch::save: Refusing to save file with bad status code\n";
+			if ($DEBUG) {
+				print STDERR "Fetch::save: Refusing to save file with bad status code\n";
+			}
 			return 1;
 		}
 	}