From 60f4f5b9d8a3df175f828b9c32c0cb75eb5f4d98 Mon Sep 17 00:00:00 2001
From: David Robillard <d@drobilla.net>
Date: Sat, 6 Dec 2014 16:07:32 -0500
Subject: [PATCH] Fix inappropriately massive flag font.

---
 gtk2_ardour/patch_change.cc | 1 +
 libs/canvas/canvas/flag.h   | 4 ++++
 libs/canvas/flag.cc         | 6 ++++++
 3 files changed, 11 insertions(+)

diff --git a/gtk2_ardour/patch_change.cc b/gtk2_ardour/patch_change.cc
index ce9bb0a142..09fb8b9778 100644
--- a/gtk2_ardour/patch_change.cc
+++ b/gtk2_ardour/patch_change.cc
@@ -66,6 +66,7 @@ PatchChange::PatchChange(
 	CANVAS_DEBUG_NAME (_flag, text);
 
 	_flag->Event.connect (sigc::mem_fun (*this, &PatchChange::event_handler));
+	_flag->set_font_description (ARDOUR_UI::config()->get_SmallFont());
 	_flag->set_text(text);
 }
 
diff --git a/libs/canvas/canvas/flag.h b/libs/canvas/canvas/flag.h
index 3aff9ed241..19a302b4b6 100644
--- a/libs/canvas/canvas/flag.h
+++ b/libs/canvas/canvas/flag.h
@@ -17,6 +17,8 @@
     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 */
 
+#include <pangomm/fontdescription.h>
+
 #include "canvas/visibility.h"
 #include "canvas/types.h"
 #include "canvas/container.h"
@@ -36,6 +38,8 @@ public:
 	void set_text (std::string const &);
 	void set_height (Distance);
 
+	void set_font_description (Pango::FontDescription);
+
         bool covers (Duple const &) const;
 	
 private:
diff --git a/libs/canvas/flag.cc b/libs/canvas/flag.cc
index 243e71cd17..7425166043 100644
--- a/libs/canvas/flag.cc
+++ b/libs/canvas/flag.cc
@@ -61,6 +61,12 @@ Flag::setup (Distance height, Duple position)
 	set_position (position);
 }
 
+void
+Flag::set_font_description (Pango::FontDescription font_description)
+{
+	_text->set_font_description (font_description);
+}
+
 void
 Flag::set_text (string const & text)
 {