fluid-console display macosx

openmusic-project · Apr 8, 2023 · 8f84e13 · 8f84e13
1 parent fab9e6b
commit 8f84e13
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/OPENMUSIC/code/projects/fluid/tools/fluid-console.lisp b/OPENMUSIC/code/projects/fluid/tools/fluid-console.lisp
@@ -449,8 +449,10 @@ In this case, all internal events are sent simultaneously.
   (setf (channelText self) (om-make-dialog-item 'om-static-text
                                                 (om-make-point 8 5) 
                                                 (om-make-point 76 20) "FLUIDSYNTH" 
-                                                :font #+(or linux macosx)*om-default-font2b*
-                                                      #+win32 *om-default-font1b*
+                                                :font 
+                                                #+linux *om-default-font2b*
+                                                #+macosx (om-make-font oa::*om-def-bold-font-face* 10 :style '(:bold))
+                                                #+win32 *om-default-font1b*
                                                 ))
 
   (setf (channelBox self)