user-init.scm

(use-modules
 (sortsmillff usermenu)
 (sortsmillff views))

(register-fontforge-menu-item
   #:window 'font
   ; #:menu-path '("submenu" "entry")
   #:menu-path '("entry")
   #:action (lambda (fv)
               (write fv)
               (newline)))

(register-fontforge-menu-item
   #:window 'glyph
   ; #:menu-path '("submenu" "entry")
   #:menu-path '("entry")
   #:action (lambda (gv)
               (write gv)
               (newline)))