From cc9bd8387aef68abb0914a7e0e1f4c757ab88da2 Mon Sep 17 00:00:00 2001
From: cris <cris@c028cbd2-c16b-5b4b-a496-9718f37d4682>
Date: Mon, 6 Oct 1997 08:31:21 +0000
Subject: [PATCH] corretto da guy errore su impostazione stampante

git-svn-id: svn://10.65.10.50/trunk@5323 c028cbd2-c16b-5b4b-a496-9718f37d4682
---
 include/form.cpp | 12 ++++++++++--
 1 file changed, 10 insertions(+), 2 deletions(-)

diff --git a/include/form.cpp b/include/form.cpp
index 1655f030a..ec1bb1624 100755
--- a/include/form.cpp
+++ b/include/form.cpp
@@ -5233,8 +5233,16 @@ void TForm::read(
   set_compulsory_specials();
   TPrinter& pr = printer();
   pr.set_offset(_y,_x);
-  pr.set_char_size(_fontsize);
-  pr.set_fontname(_fontname);
+  if (_fontname.not_empty())
+  {
+  	pr.set_char_size(_fontsize);
+  	pr.set_fontname(_fontname);
+	} 
+	else
+	{
+		_fontname = pr.fontname();
+		_fontsize = pr.get_char_size();
+	}
   set_fink_mode(TRUE);
 
   main_app().end_wait();