From 0ddcc3ab45d6e8455b018d2301e99646fdd11503 Mon Sep 17 00:00:00 2001
From: Martin Mares <mj@ucw.cz>
Date: Mon, 31 May 2021 13:00:29 +0200
Subject: [PATCH] JCL: Do not send a newline after the final UEL
This was creating a new, empty job at AltaLink 8135C.
---
ppd/PPD/PJL.pm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/ppd/PPD/PJL.pm b/ppd/PPD/PJL.pm
index b90842d..ebeb2bd 100644
--- a/ppd/PPD/PJL.pm
+++ b/ppd/PPD/PJL.pm
@@ -10,7 +10,7 @@ sub add_jcl(;$) {
set('JCLBegin', '<1B>%-12345X@PJL<0A>');
set('JCLToPSInterpreter', '@PJL ENTER LANGUAGE = POSTSCRIPT<0A>');
set('JCLToPDFInterpreter', '@PJL ENTER LANGUAGE = PDF<0A>') if $opt->{PDF};
- set('JCLEnd', '<1B>%-12345X@PJL EOJ<0A><1B>%-12345X<0A>');
+ set('JCLEnd', '<1B>%-12345X@PJL EOJ<0A><1B>%-12345X');
}
sub jopt {
--
GitLab