From b0e5db0b689354eaae2625fa9ffdfef20af10b60 Mon Sep 17 00:00:00 2001 From: mattias Date: Tue, 13 Apr 2004 20:24:46 +0000 Subject: [PATCH] fixed TPostscriptCanvas.SetFontFace from Eric git-svn-id: trunk@5408 - --- docs/Contributors.txt | 1 + lcl/postscriptprinter.pas | 2 +- 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/docs/Contributors.txt b/docs/Contributors.txt index 810c846e2f..92b17dfd51 100644 --- a/docs/Contributors.txt +++ b/docs/Contributors.txt @@ -8,6 +8,7 @@ Cliff Baeseman Colin Western Curtis White Darek Mazur +Eric Chapman GongYu Hans-Joachim Ott Jason King diff --git a/lcl/postscriptprinter.pas b/lcl/postscriptprinter.pas index ee5a4f45b7..2280444810 100644 --- a/lcl/postscriptprinter.pas +++ b/lcl/postscriptprinter.pas @@ -262,7 +262,7 @@ var MyString: String; begin if FFontFace=AValue then exit; - if pos(' ',AValue) > -1 then + if pos(' ',AValue) > 0 then FFontFace := '('+AValue+')' else FFontFace:=AValue;