From: Michael Gauland Date: Tue, 22 Oct 2013 00:47:32 +0000 (-0400) Subject: * lisp/progmodes/ebnf2ps.el (ebnf-prologue): Avoid PS error with some X-Git-Tag: emacs-24.3.90~173^2^2~42^2~45^2~387^2~1192 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a0f143c90aa823abced50061844eb66704fe9c65;p=emacs.git * lisp/progmodes/ebnf2ps.el (ebnf-prologue): Avoid PS error with some viewers such as evince when ebnf-production-name-p is nil. Fixes: debbugs:15625 --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 9a00661aef9..9a5e8dccc0c 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2013-10-22 Michael Gauland + + * progmodes/ebnf2ps.el (ebnf-prologue): Avoid PS error with some + viewers such as evince when ebnf-production-name-p is nil. (Bug#15625) + 2013-10-21 Dmitry Gutov * progmodes/ruby-mode.el (ruby-smie-grammar): Remove outdated diff --git a/lisp/progmodes/ebnf2ps.el b/lisp/progmodes/ebnf2ps.el index caa33d36440..4c2dfc98285 100644 --- a/lisp/progmodes/ebnf2ps.el +++ b/lisp/progmodes/ebnf2ps.el @@ -3912,7 +3912,7 @@ See documentation for `ebnf-terminal-shape', `ebnf-non-terminal-shape' and {/Effect EffectP def /fP F ForegroundP SetRGB BackgroundP aload pop true BG S /Effect 0 def - ( :) S false BG}if + ( :) S false BG}{pop}ifelse xw yw moveto hT EL RA xp yw moveto