Let default subject be empty

diff --git a/TODO b/TODO
index 1c75f3870e0ff7c05ab18b3a0e0a789f329d05f2..8b5668303c528dee89201d33b3eaf2079b3ee1f0 100644 (file)
--- a/TODO
+++ b/TODO
@@ -10,4 +10,3 @@
 - Detector of orphans (unused queue dirs, jobs on non-existent machines, non-queued jobs)
 - job failed => give a more explanatory message
 - write_job_status should be atomic
-- change ((no subject))

diff --git a/lib/BEX/Job.pm b/lib/BEX/Job.pm
index 1b920e45c37c32676e7ab31c1ce845eb5317eb61..b0add1b3fe1f37bc1789af28f5e8d74f6a7a563e 100644 (file)
--- a/lib/BEX/Job.pm
+++ b/lib/BEX/Job.pm
@@ -26,7 +26,7 @@ sub new($;$) {
                $job_cnt++;
                $job->{'ID'} = POSIX::strftime("%Y%m%d-%H%M%S-$$-$job_cnt", localtime);
        }
-       $job->{'Subject'} = '(no subject)';
+       $job->{'Subject'} = '';
        return $job;
 }
 
@@ -46,7 +46,7 @@ sub new_from_file($$;$) {
                $job->{'body'} = join("", @cmds);
        }
        close T;
-       $job->{'Subject'} //= '?';
+       $job->{'Subject'} //= '';
        $job->{'ID'} or die "Cannot load $file: Missing ID";
        check_id($job->{'ID'}) or die "Cannot load $file: Invalid ID syntax";
        return bless $job;