diff options
| author | Kenichi Handa <handa@m17n.org> | 2005-07-27 12:35:51 +0000 |
|---|---|---|
| committer | Kenichi Handa <handa@m17n.org> | 2005-07-27 12:35:51 +0000 |
| commit | 2f3a9d50b8e495383a2ee0fc7e95728bc81be7ca (patch) | |
| tree | 3ff51a571546ff017e1e382068f987edc53fbfbf /lisp/ps-mule.el | |
| parent | 3509543ca9141609638018dc7fa91ddaf425037d (diff) | |
| download | emacs-2f3a9d50b8e495383a2ee0fc7e95728bc81be7ca.tar.gz | |
(ps-mule-composition-prologue): Fix for the case that
RelativeCompose is false.
Diffstat (limited to 'lisp/ps-mule.el')
| -rw-r--r-- | lisp/ps-mule.el | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/lisp/ps-mule.el b/lisp/ps-mule.el index 2bae4de7d44..e57e030c40b 100644 --- a/lisp/ps-mule.el +++ b/lisp/ps-mule.el @@ -1039,9 +1039,12 @@ the sequence." /BOTTOM LLY def currentfont /RelativeCompose known { /relative currentfont /RelativeCompose get def + relative false eq { + %% Disable relative composition by setting sufficiently low + %% and high positions. + /relative [ -100000 100000 ] def + } if } { - %% Disable relative composition by setting sufficiently low - %% and high positions. /relative [ -100000 100000 ] def } ifelse [ elt 0 0 ] |