From 268507ff251989dfe38a78e299b5d421242161cd Mon Sep 17 00:00:00 2001
From: Ole Tange <ole@tange.dk>
Date: Mon, 22 May 2023 00:47:31 +0200
Subject: [PATCH] parallel: Warn if content of --jobs myfile is empty.

---
 src/parallel | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/src/parallel b/src/parallel
index c2068d27..a577a330 100755
--- a/src/parallel
+++ b/src/parallel
@@ -8285,6 +8285,11 @@ sub user_requested_processes($) {
 	    if(open(my $in_fh, "<", $Global::max_procs_file)) {
 		my $opt_P_file = join("",<$in_fh>);
 		close $in_fh;
+		if($opt_P_file !~ /\S/) {
+		    ::warning_once("$Global::max_procs_file is empty. ".
+				   "Treated as 100%");
+		    $opt_P_file = "100%";
+		}
 		$processes = $self->user_requested_processes($opt_P_file);
 	    } else {
 		::error("Cannot open $opt_P.");