diff --git a/OPENMUSIC/code/projects/fluid/tools/fluid-console.lisp b/OPENMUSIC/code/projects/fluid/tools/fluid-console.lisp index cb8b0b5e..89666371 100644 --- 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)