Merge branch 't42'
authorDobrica Pavlinusic <dpavlin@rot13.org>
Sat, 2 Mar 2019 07:44:15 +0000 (08:44 +0100)
committerDobrica Pavlinusic <dpavlin@rot13.org>
Sat, 2 Mar 2019 07:44:15 +0000 (08:44 +0100)
doc/EN_SAG_XE3022EN0-2.pdf [new file with mode: 0644]
doc/PJL_Technical_Reference_Manual.pdf [new file with mode: 0644]
xwc-jobs.pl

diff --git a/doc/EN_SAG_XE3022EN0-2.pdf b/doc/EN_SAG_XE3022EN0-2.pdf
new file mode 100644 (file)
index 0000000..6ff8a7f
Binary files /dev/null and b/doc/EN_SAG_XE3022EN0-2.pdf differ
diff --git a/doc/PJL_Technical_Reference_Manual.pdf b/doc/PJL_Technical_Reference_Manual.pdf
new file mode 100644 (file)
index 0000000..44355f7
Binary files /dev/null and b/doc/PJL_Technical_Reference_Manual.pdf differ
index 7b6156c..3fd0f95 100755 (executable)
@@ -93,6 +93,8 @@ if ( exists $info->{spcs} ) {
        exit 0;
 } 
 
+exit 1 if ! defined $info->{hdrs}; # we didn't get expected output
+
 my @headers = @{ $info->{hdrs} };
 unshift @headers, 'id' if $op eq 'list';
 unshift @headers, 'IP';