click zones of radio-button-panel

Hi all

I am trying to use a homebrewn font in a radio-button-panel. Each row looks something like this (simplified):

(make-instance 'capi:row-layout
                 :description (list
                               (make-instance 'capi:radio-button-panel
                                              :items (list "A" "B")
                                              :font (gp:make-font-description :family "Myfont" :size #+cocoa 20 #+win32 15)))
                 ;:visible-min-height 30
                 ;:visible-max-height 30
                 )

The problem is that the "click zones" get very tall for the strings "A" and "B" so I cannot use :visible-min-height and :visible-max-height to make less space between rows, because then the "click zones" will overlap.
I guess the "click zone" height of the strings depends on the height of the glyphs in the font.
Is there a way to either "cut" the click zones of the strings or make only the radio buttons (and not he strings) clickable?

This is for LWM 6.1 and LWW 6.1 by the way.

Thanks!
Sven

_______________________________________________
Lisp Hug - the mailing list for LispWorks users
lisp-hug@lispworks.com
http://www.lispworks.com/support/lisp-hug.html