From: Po Lu <luangruo@yahoo.com>
Date: Sun, 1 May 2022 09:08:33 +0000 (+0000)
Subject: Fix specifying zero as a size for fonts on Haiku
X-Git-Tag: emacs-29.0.90~1931^2~159
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6984f325bdbaf15b1190d0d03b01eebe9cfbbb71;p=emacs.git

Fix specifying zero as a size for fonts on Haiku

* src/haiku_support.cc (MessageReceived): Set `size_specified'
correctly.
---

diff --git a/src/haiku_support.cc b/src/haiku_support.cc
index 67b7e143bfb..9e31e1b870f 100644
--- a/src/haiku_support.cc
+++ b/src/haiku_support.cc
@@ -2519,15 +2519,13 @@ class EmacsFontSelectionDialog : public BWindow
     else if (msg->what == B_OK
 	     && font_style_pane.CurrentSelection () >= 0)
       {
+	text = size_entry.Text ();
+
 	rq.cancel = false;
 	rq.family_idx = font_family_pane.CurrentSelection ();
 	rq.style_idx = font_style_pane.CurrentSelection ();
-
-	text = size_entry.Text ();
 	rq.size = atoi (text);
-
-	if (rq.size > 0)
-	  rq.size_specified = true;
+	rq.size_specified = rq.size > 0 || strlen (text);
 
 	write_port (comm_port, 0, &rq, sizeof rq);
       }