Re: [Bug: 21.5-b26] Options->Font Menu raises an error

Jerry James writes: thank you Jerry, i put your redefinition in the init file, and then i did the mouse gimnastic that i described previously... sorry to say that the problem does not go away here are the details (PS: has anyone a function to insert an uuencoded/base64'd version of a buffer?) (1) (event/warning) Error during menu callback: (wrong-type-argument (devicep #<x-frame "XEmacs" 0x2a78b>)) Backtrace follows: # bind (inhibit-quit) fc-font-match(#<x-frame "XEmacs" 0x2a78b> #<INTERNAL OBJECT (XEmacs bug?) (fc-pattern) 0x8b29c08>) # bind (entry truename domain name dcache face) x-font-menu-font-data-xft(default [(["Balker" (nil) (0) nil] ["Bitstream Charter" ("Bold" nil) (0) nil] ["Bitstream Vera Sans" ("Bold" nil) (0) nil] ["Bitstream Vera Sans Mono" ("Bold" nil) (0) nil] ["Bitstream Vera Serif" ("Bold" nil) (0) nil] ["Century Schoolbook L" ("Bold" "Medium" nil) (0) nil] ["Charter" ("Bold" "Medium" nil) (0) nil] ["Clean" (nil) (0) nil] ["ClearlyU" (nil) (0) nil] ["ClearlyU PUA" (nil) (0) nil] ["Computer Modern" ("Bold" "Medium") (0) nil] ["Computer Modern Bright" ("Bold" "Demibold" "Medium" nil) (0) nil] ["Computer Modern Concrete" ("Medium") (0) nil] ["Courier" ("Bold" "Medium" nil) (0) nil] ["Courier 10 Pitch" ("Bold" nil) (0) nil] ["Delphine" (nil) (0) nil] ["Dingbats" (nil) (0) nil] ["Domestic Manners" (nil) (0) nil] ["Dustismo" ("Bold" nil) (0) nil] ["Dustismo Roman" ("Bold" nil) (0) nil] ["El Abogado Loco" (nil) (0) nil] ["Fixed" ("Bold" "Medium" nil) (0) nil] ["FreeMono" ("Bold" nil) (0) nil] ["FreeSans" ("Bold" nil) (0) nil] ["FreeSerif"! ("Bold" nil) (0) nil] ["Helvetica" ("Bold" "Medium" nil) (0) nil] ["Hershey-Gothic-English" (nil) (0) nil] ["Hershey-Gothic-German" (nil) (0) nil] ["Hershey-Gothic-Italian" (nil) (0) nil] ["Hershey-Plain-Duplex" (nil) (0) nil] ["Hershey-Plain-Duplex-Italic" (nil) (0) nil] ["Hershey-Plain-Triplex" (nil) (0) nil] ["Hershey-Plain-Triplex-Italic" (nil) (0) nil] ["Hershey-Script-Complex" (nil) (0) nil] ["Hershey-Script-Simplex" (nil) (0) nil] ["It wasn't me" (nil) (0) nil] ["Junkyard" (nil) (0) nil] ["LMRoman10" ("Bold" "Demibold" nil) (0) nil] ["LMSans10" ("Bold" "Demibold" nil) (0) nil] ["LMTypewriter10" ("Bold" nil nil) (0) nil] ["LMTypewriterVarWd10" ("Bold" nil nil) (0) nil] ["Lucida" ("Bold" "Medium") (0) nil] ["LucidaBright" ("Medium" nil) (0) nil] ["LucidaTypewriter" ("Bold" "Medium") (0) nil] ["Marked Fool" (nil) (0) nil] ["New Century Schoolbook" ("Bold" "Medium" nil) (0) nil] ["Newspaper" (nil) (0) nil] ["Nimbus Mono L" ("Bold" nil) (0) nil] ["Nimbus Roman No9 L" ("B! old" nil) (0) nil] ["Nimbus Sans L" ("Bold" nil) (0) nil] ["Pe! nguin At t ack" (nil) (0) nil] ["Steve" (nil) (0) nil] ["Swift" (nil) (0) nil] ["Terminal" ("Bold" nil) (0) nil] ["Times" ("Bold" "Medium" nil) (0) nil] ["URW Bookman L" ("Bold" "Medium" nil) (0) nil] ["URW Chancery L" ("Medium") (0) nil] ["URW Gothic L" ("Demibold" nil) (0) nil] ["URW Palladio L" ("Bold" "Medium" nil) (0) nil] ["Utopia" ("Bold" nil) (0) nil] ["Wargames" (nil) (0) nil] ["Winks" (nil) (0) nil] ["cmex10" ("Medium") (0) nil] ["cmmi10" ("Medium") (0) nil] ["cmr10" ("Medium") (0) nil] ["cmsy10" ("Medium") (0) nil] ["flatline" (nil) (0) nil] ["msam10" ("Medium") (0) nil] ["msbm10" ("Medium") (0) nil] ["progenisis" (nil) (0) nil] ["wasy10" (nil) (0) nil]) (["Balker" (font-menu-set-font "Balker" nil nil) :style radio :active nil :selected nil] ["Bitstream Charter" (font-menu-set-font "Bitstream Charter" nil nil) :style radio :active nil :selected nil] ["Bitstream Vera Sans" (font-menu-set-font "Bitstream Vera Sans" nil nil) :style radio :active nil :selected nil] ["Bitstream V! era Sans Mono" (font-menu-set-font "Bitstream Vera Sans Mono" nil nil) :style radio :active nil :selected nil] ["Bitstream Vera Serif" (font-menu-set-font "Bitstream Vera Serif" nil nil) :style radio :active nil :selected nil] ["Century Schoolbook L" (font-menu-set-font "Century Schoolbook L" nil nil) :style radio :active nil :selected nil] ["Charter" (font-menu-set-font "Charter" nil nil) :style radio :active nil :selected nil] ["Clean" (font-menu-set-font "Clean" nil nil) :style radio :active nil :selected nil] ["ClearlyU" (font-menu-set-font "ClearlyU" nil nil) :style radio :active nil :selected nil] ["ClearlyU PUA" (font-menu-set-font "ClearlyU PUA" nil nil) :style radio :active nil :selected nil] ["Computer Modern" (font-menu-set-font "Computer Modern" nil nil) :style radio :active nil :selected nil] ["Computer Modern Bright" (font-menu-set-font "Computer Modern Bright" nil nil) :style radio :active nil :selected nil] ["Computer Modern Concrete" (font-menu-set-font "Co! mputer Modern Concrete" nil nil) :style radio :active nil :sel! ected ni l ] ["Courier" (font-menu-set-font "Courier" nil nil) :style radio :active nil :selected nil] ["Courier 10 Pitch" (font-menu-set-font "Courier 10 Pitch" nil nil) :style radio :active nil :selected nil] ["Delphine" (font-menu-set-font "Delphine" nil nil) :style radio :active nil :selected nil] ["Dingbats" (font-menu-set-font "Dingbats" nil nil) :style radio :active nil :selected nil] ["Domestic Manners" (font-menu-set-font "Domestic Manners" nil nil) :style radio :active nil :selected nil] ["Dustismo" (font-menu-set-font "Dustismo" nil nil) :style radio :active nil :selected nil] ["Dustismo Roman" (font-menu-set-font "Dustismo Roman" nil nil) :style radio :active nil :selected nil] ["El Abogado Loco" (font-menu-set-font "El Abogado Loco" nil nil) :style radio :active nil :selected nil] ["Fixed" (font-menu-set-font "Fixed" nil nil) :style radio :active nil :selected nil] ["FreeMono" (font-menu-set-font "FreeMono" nil nil) :style radio :active nil :selected nil] ["FreeSans" (font! -menu-set-font "FreeSans" nil nil) :style radio :active nil :selected nil] ["FreeSerif" (font-menu-set-font "FreeSerif" nil nil) :style radio :active nil :selected nil] ["Helvetica" (font-menu-set-font "Helvetica" nil nil) :style radio :active nil :selected nil] ["Hershey-Gothic-English" (font-menu-set-font "Hershey-Gothic-English" nil nil) :style radio :active nil :selected nil] ["Hershey-Gothic-German" (font-menu-set-font "Hershey-Gothic-German" nil nil) :style radio :active nil :selected nil] ["Hershey-Gothic-Italian" (font-menu-set-font "Hershey-Gothic-Italian" nil nil) :style radio :active nil :selected nil] ["Hershey-Plain-Duplex" (font-menu-set-font "Hershey-Plain-Duplex" nil nil) :style radio :active nil :selected nil] ["Hershey-Plain-Duplex-Italic" (font-menu-set-font "Hershey-Plain-Duplex-Italic" nil nil) :style radio :active nil :selected nil] ["Hershey-Plain-Triplex" (font-menu-set-font "Hershey-Plain-Triplex" nil nil) :style radio :active nil :selected nil] ["H! ershey-Plain-Triplex-Italic" (font-menu-set-font "Hershey-Plai! n-Triple x -Italic" nil nil) :style radio :active nil :selected nil] ["Hershey-Script-Complex" (font-menu-set-font "Hershey-Script-Complex" nil nil) :style radio :active nil :selected nil] ["Hershey-Script-Simplex" (font-menu-set-font "Hershey-Script-Simplex" nil nil) :style radio :active nil :selected nil] ["It wasn't me" (font-menu-set-font "It wasn't me" nil nil) :style radio :active nil :selected nil] ["Junkyard" (font-menu-set-font "Junkyard" nil nil) :style radio :active nil :selected nil] ["LMRoman10" (font-menu-set-font "LMRoman10" nil nil) :style radio :active nil :selected nil] ["LMSans10" (font-menu-set-font "LMSans10" nil nil) :style radio :active nil :selected nil] ["LMTypewriter10" (font-menu-set-font "LMTypewriter10" nil nil) :style radio :active nil :selected nil] ["LMTypewriterVarWd10" (font-menu-set-font "LMTypewriterVarWd10" nil nil) :style radio :active nil :selected nil] ["Lucida" (font-menu-set-font "Lucida" nil nil) :style radio :active nil :selected nil] ["Lucid! aBright" (font-menu-set-font "LucidaBright" nil nil) :style radio :active nil :selected nil] ["LucidaTypewriter" (font-menu-set-font "LucidaTypewriter" nil nil) :style radio :active nil :selected nil] ["Marked Fool" (font-menu-set-font "Marked Fool" nil nil) :style radio :active nil :selected nil] ["New Century Schoolbook" (font-menu-set-font "New Century Schoolbook" nil nil) :style radio :active nil :selected nil] ["Newspaper" (font-menu-set-font "Newspaper" nil nil) :style radio :active nil :selected nil] ["Nimbus Mono L" (font-menu-set-font "Nimbus Mono L" nil nil) :style radio :active nil :selected nil] ["Nimbus Roman No9 L" (font-menu-set-font "Nimbus Roman No9 L" nil nil) :style radio :active nil :selected nil] ["Nimbus Sans L" (font-menu-set-font "Nimbus Sans L" nil nil) :style radio :active nil :selected nil] ["Penguin Attack" (font-menu-set-font "Penguin Attack" nil nil) :style radio :active nil :selected nil] ["Steve" (font-menu-set-font "Steve" nil nil) :style ra! dio :active nil :selected nil] ["Swift" (font-menu-set-font "S! wift" ni l nil) :style radio :active nil :selected nil] ["Terminal" (font-menu-set-font "Terminal" nil nil) :style radio :active nil :selected nil] ["Times" (font-menu-set-font "Times" nil nil) :style radio :active nil :selected nil] ["URW Bookman L" (font-menu-set-font "URW Bookman L" nil nil) :style radio :active nil :selected nil] ["URW Chancery L" (font-menu-set-font "URW Chancery L" nil nil) :style radio :active nil :selected nil] ["URW Gothic L" (font-menu-set-font "URW Gothic L" nil nil) :style radio :active nil :selected nil] ["URW Palladio L" (font-menu-set-font "URW Palladio L" nil nil) :style radio :active nil :selected nil] ["Utopia" (font-menu-set-font "Utopia" nil nil) :style radio :active nil :selected nil] ["Wargames" (font-menu-set-font "Wargames" nil nil) :style radio :active nil :selected nil] ["Winks" (font-menu-set-font "Winks" nil nil) :style radio :active nil :selected nil] ["cmex10" (font-menu-set-font "cmex10" nil nil) :style radio :active nil :selected nil] [! "cmmi10" (font-menu-set-font "cmmi10" nil nil) :style radio :active nil :selected nil] ["cmr10" (font-menu-set-font "cmr10" nil nil) :style radio :active nil :selected nil] ["cmsy10" (font-menu-set-font "cmsy10" nil nil) :style radio :active nil :selected nil] ["flatline" (font-menu-set-font "flatline" nil nil) :style radio :active nil :selected nil] ["msam10" (font-menu-set-font "msam10" nil nil) :style radio :active nil :selected nil] ["msbm10" (font-menu-set-font "msbm10" nil nil) :style radio :active nil :selected nil] ["progenisis" (font-menu-set-font "progenisis" nil nil) :style radio :active nil :selected nil] ["wasy10" (font-menu-set-font "wasy10" nil nil) :style radio :active nil :selected nil]) (["6" (font-menu-set-font nil nil 6) :style radio :active nil :selected nil] ["8" (font-menu-set-font nil nil 8) :style radio :active nil :selected nil] ["10" (font-menu-set-font nil nil 10) :style radio :active nil :selected nil] ["11" (font-menu-set-font nil nil 11) :styl! e radio :active nil :selected nil] ["12" (font-menu-set-font n! il nil 1 2 ):style radio :active nil :selected nil] ["13" (font-menu-set-font nil nil 13) :style radio :active nil :selected nil] ["14" (font-menu-set-font nil nil 14) :style radio :active nil :selected nil] ["15" (font-menu-set-font nil nil 15) :style radio :active nil :selected nil] ["16" (font-menu-set-font nil nil 16) :style radio :active nil :selected nil] ["17" (font-menu-set-font nil nil 17) :style radio :active nil :selected nil] ["18" (font-menu-set-font nil nil 18) :style radio :active nil :selected nil] ["20" (font-menu-set-font nil nil 20) :style radio :active nil :selected nil] ["22" (font-menu-set-font nil nil 22) :style radio :active nil :selected nil] ["24" (font-menu-set-font nil nil 24) :style radio :active nil :selected nil] ["30" (font-menu-set-font nil nil 30) :style radio :active nil :selected nil] ["36" (font-menu-set-font nil nil 36) :style radio :active nil :selected nil]) (["Light" (font-menu-set-font nil "Light" nil) :style radio :active nil :selected nil] ["! Medium" (font-menu-set-font nil "Medium" nil) :style radio :active nil :selected nil] ["Demibold" (font-menu-set-font nil "Demibold" nil) :style radio :active nil :selected nil] ["Bold" (font-menu-set-font nil "Bold" nil) :style radio :active nil :selected nil] ["Black" (font-menu-set-font nil "Black" nil) :style radio :active nil :selected nil])] "mono:size=10" #<x-frame "XEmacs" 0x2a78b>) # bind (name domain case-fold-search dcache face) x-font-menu-font-data(default [(["Balker" (nil) (0) nil] ["Bitstream Charter" ("Bold" nil) (0) nil] ["Bitstream Vera Sans" ("Bold" nil) (0) nil] ["Bitstream Vera Sans Mono" ("Bold" nil) (0) nil] ["Bitstream Vera Serif" ("Bold" nil) (0) nil] ["Century Schoolbook L" ("Bold" "Medium" nil) (0) nil] ["Charter" ("Bold" "Medium" nil) (0) nil] ["Clean" (nil) (0) nil] ["ClearlyU" (nil) (0) nil] ["ClearlyU PUA" (nil) (0) nil] ["Computer Modern" ("Bold" "Medium") (0) nil] ["Computer Modern Bright" ("Bold" "Demibold" "Medium" nil) (0) nil] ["Computer Modern Concrete" ("Medium") (0) nil] ["Courier" ("Bold" "Medium" nil) (0) nil] ["Courier 10 Pitch" ("Bold" nil) (0) nil] ["Delphine" (nil) (0) nil] ["Dingbats" (nil) (0) nil] ["Domestic Manners" (nil) (0) nil] ["Dustismo" ("Bold" nil) (0) nil] ["Dustismo Roman" ("Bold" nil) (0) nil] ["El Abogado Loco" (nil) (0) nil] ["Fixed" ("Bold" "Medium" nil) (0) nil] ["FreeMono" ("Bold" nil) (0) nil] ["FreeSans" ("Bold" nil) (0) nil] ["FreeSerif" ("B! old" nil) (0) nil] ["Helvetica" ("Bold" "Medium" nil) (0) nil] ["Hershey-Gothic-English" (nil) (0) nil] ["Hershey-Gothic-German" (nil) (0) nil] ["Hershey-Gothic-Italian" (nil) (0) nil] ["Hershey-Plain-Duplex" (nil) (0) nil] ["Hershey-Plain-Duplex-Italic" (nil) (0) nil] ["Hershey-Plain-Triplex" (nil) (0) nil] ["Hershey-Plain-Triplex-Italic" (nil) (0) nil] ["Hershey-Script-Complex" (nil) (0) nil] ["Hershey-Script-Simplex" (nil) (0) nil] ["It wasn't me" (nil) (0) nil] ["Junkyard" (nil) (0) nil] ["LMRoman10" ("Bold" "Demibold" nil) (0) nil] ["LMSans10" ("Bold" "Demibold" nil) (0) nil] ["LMTypewriter10" ("Bold" nil nil) (0) nil] ["LMTypewriterVarWd10" ("Bold" nil nil) (0) nil] ["Lucida" ("Bold" "Medium") (0) nil] ["LucidaBright" ("Medium" nil) (0) nil] ["LucidaTypewriter" ("Bold" "Medium") (0) nil] ["Marked Fool" (nil) (0) nil] ["New Century Schoolbook" ("Bold" "Medium" nil) (0) nil] ["Newspaper" (nil) (0) nil] ["Nimbus Mono L" ("Bold" nil) (0) nil] ["Nimbus Roman No9 L" ("Bold"! nil) (0) nil] ["Nimbus Sans L" ("Bold" nil) (0) nil] ["Pengui! n Attack " (nil) (0) nil] ["Steve" (nil) (0) nil] ["Swift" (nil) (0) nil] ["Terminal" ("Bold" nil) (0) nil] ["Times" ("Bold" "Medium" nil) (0) nil] ["URW Bookman L" ("Bold" "Medium" nil) (0) nil] ["URW Chancery L" ("Medium") (0) nil] ["URW Gothic L" ("Demibold" nil) (0) nil] ["URW Palladio L" ("Bold" "Medium" nil) (0) nil] ["Utopia" ("Bold" nil) (0) nil] ["Wargames" (nil) (0) nil] ["Winks" (nil) (0) nil] ["cmex10" ("Medium") (0) nil] ["cmmi10" ("Medium") (0) nil] ["cmr10" ("Medium") (0) nil] ["cmsy10" ("Medium") (0) nil] ["flatline" (nil) (0) nil] ["msam10" ("Medium") (0) nil] ["msbm10" ("Medium") (0) nil] ["progenisis" (nil) (0) nil] ["wasy10" (nil) (0) nil]) (["Balker" (font-menu-set-font "Balker" nil nil) :style radio :active nil :selected nil] ["Bitstream Charter" (font-menu-set-font "Bitstream Charter" nil nil) :style radio :active nil :selected nil] ["Bitstream Vera Sans" (font-menu-set-font "Bitstream Vera Sans" nil nil) :style radio :active nil :selected nil] ["Bitstream Vera ! Sans Mono" (font-menu-set-font "Bitstream Vera Sans Mono" nil nil) :style radio :active nil :selected nil] ["Bitstream Vera Serif" (font-menu-set-font "Bitstream Vera Serif" nil nil) :style radio :active nil :selected nil] ["Century Schoolbook L" (font-menu-set-font "Century Schoolbook L" nil nil) :style radio :active nil :selected nil] ["Charter" (font-menu-set-font "Charter" nil nil) :style radio :active nil :selected nil] ["Clean" (font-menu-set-font "Clean" nil nil) :style radio :active nil :selected nil] ["ClearlyU" (font-menu-set-font "ClearlyU" nil nil) :style radio :active nil :selected nil] ["ClearlyU PUA" (font-menu-set-font "ClearlyU PUA" nil nil) :style radio :active nil :selected nil] ["Computer Modern" (font-menu-set-font "Computer Modern" nil nil) :style radio :active nil :selected nil] ["Computer Modern Bright" (font-menu-set-font "Computer Modern Bright" nil nil) :style radio :active nil :selected nil] ["Computer Modern Concrete" (font-menu-set-font "Comput! er Modern Concrete" nil nil) :style radio :active nil :selecte! d nil] [ " Courier" (font-menu-set-font "Courier" nil nil) :style radio :active nil :selected nil] ["Courier 10 Pitch" (font-menu-set-font "Courier 10 Pitch" nil nil) :style radio :active nil :selected nil] ["Delphine" (font-menu-set-font "Delphine" nil nil) :style radio :active nil :selected nil] ["Dingbats" (font-menu-set-font "Dingbats" nil nil) :style radio :active nil :selected nil] ["Domestic Manners" (font-menu-set-font "Domestic Manners" nil nil) :style radio :active nil :selected nil] ["Dustismo" (font-menu-set-font "Dustismo" nil nil) :style radio :active nil :selected nil] ["Dustismo Roman" (font-menu-set-font "Dustismo Roman" nil nil) :style radio :active nil :selected nil] ["El Abogado Loco" (font-menu-set-font "El Abogado Loco" nil nil) :style radio :active nil :selected nil] ["Fixed" (font-menu-set-font "Fixed" nil nil) :style radio :active nil :selected nil] ["FreeMono" (font-menu-set-font "FreeMono" nil nil) :style radio :active nil :selected nil] ["FreeSans" (font-men! u-set-font "FreeSans" nil nil) :style radio :active nil :selected nil] ["FreeSerif" (font-menu-set-font "FreeSerif" nil nil) :style radio :active nil :selected nil] ["Helvetica" (font-menu-set-font "Helvetica" nil nil) :style radio :active nil :selected nil] ["Hershey-Gothic-English" (font-menu-set-font "Hershey-Gothic-English" nil nil) :style radio :active nil :selected nil] ["Hershey-Gothic-German" (font-menu-set-font "Hershey-Gothic-German" nil nil) :style radio :active nil :selected nil] ["Hershey-Gothic-Italian" (font-menu-set-font "Hershey-Gothic-Italian" nil nil) :style radio :active nil :selected nil] ["Hershey-Plain-Duplex" (font-menu-set-font "Hershey-Plain-Duplex" nil nil) :style radio :active nil :selected nil] ["Hershey-Plain-Duplex-Italic" (font-menu-set-font "Hershey-Plain-Duplex-Italic" nil nil) :style radio :active nil :selected nil] ["Hershey-Plain-Triplex" (font-menu-set-font "Hershey-Plain-Triplex" nil nil) :style radio :active nil :selected nil] ["Hersh! ey-Plain-Triplex-Italic" (font-menu-set-font "Hershey-Plain-Tr! iplex-It a lic" nil nil) :style radio :active nil :selected nil] ["Hershey-Script-Complex" (font-menu-set-font "Hershey-Script-Complex" nil nil) :style radio :active nil :selected nil] ["Hershey-Script-Simplex" (font-menu-set-font "Hershey-Script-Simplex" nil nil) :style radio :active nil :selected nil] ["It wasn't me" (font-menu-set-font "It wasn't me" nil nil) :style radio :active nil :selected nil] ["Junkyard" (font-menu-set-font "Junkyard" nil nil) :style radio :active nil :selected nil] ["LMRoman10" (font-menu-set-font "LMRoman10" nil nil) :style radio :active nil :selected nil] ["LMSans10" (font-menu-set-font "LMSans10" nil nil) :style radio :active nil :selected nil] ["LMTypewriter10" (font-menu-set-font "LMTypewriter10" nil nil) :style radio :active nil :selected nil] ["LMTypewriterVarWd10" (font-menu-set-font "LMTypewriterVarWd10" nil nil) :style radio :active nil :selected nil] ["Lucida" (font-menu-set-font "Lucida" nil nil) :style radio :active nil :selected nil] ["LucidaBri! ght" (font-menu-set-font "LucidaBright" nil nil) :style radio :active nil :selected nil] ["LucidaTypewriter" (font-menu-set-font "LucidaTypewriter" nil nil) :style radio :active nil :selected nil] ["Marked Fool" (font-menu-set-font "Marked Fool" nil nil) :style radio :active nil :selected nil] ["New Century Schoolbook" (font-menu-set-font "New Century Schoolbook" nil nil) :style radio :active nil :selected nil] ["Newspaper" (font-menu-set-font "Newspaper" nil nil) :style radio :active nil :selected nil] ["Nimbus Mono L" (font-menu-set-font "Nimbus Mono L" nil nil) :style radio :active nil :selected nil] ["Nimbus Roman No9 L" (font-menu-set-font "Nimbus Roman No9 L" nil nil) :style radio :active nil :selected nil] ["Nimbus Sans L" (font-menu-set-font "Nimbus Sans L" nil nil) :style radio :active nil :selected nil] ["Penguin Attack" (font-menu-set-font "Penguin Attack" nil nil) :style radio :active nil :selected nil] ["Steve" (font-menu-set-font "Steve" nil nil) :style radio ! :active nil :selected nil] ["Swift" (font-menu-set-font "Swift! " nil ni l ):style radio :active nil :selected nil] ["Terminal" (font-menu-set-font "Terminal" nil nil) :style radio :active nil :selected nil] ["Times" (font-menu-set-font "Times" nil nil) :style radio :active nil :selected nil] ["URW Bookman L" (font-menu-set-font "URW Bookman L" nil nil) :style radio :active nil :selected nil] ["URW Chancery L" (font-menu-set-font "URW Chancery L" nil nil) :style radio :active nil :selected nil] ["URW Gothic L" (font-menu-set-font "URW Gothic L" nil nil) :style radio :active nil :selected nil] ["URW Palladio L" (font-menu-set-font "URW Palladio L" nil nil) :style radio :active nil :selected nil] ["Utopia" (font-menu-set-font "Utopia" nil nil) :style radio :active nil :selected nil] ["Wargames" (font-menu-set-font "Wargames" nil nil) :style radio :active nil :selected nil] ["Winks" (font-menu-set-font "Winks" nil nil) :style radio :active nil :selected nil] ["cmex10" (font-menu-set-font "cmex10" nil nil) :style radio :active nil :selected nil] ["cmmi! 10" (font-menu-set-font "cmmi10" nil nil) :style radio :active nil :selected nil] ["cmr10" (font-menu-set-font "cmr10" nil nil) :style radio :active nil :selected nil] ["cmsy10" (font-menu-set-font "cmsy10" nil nil) :style radio :active nil :selected nil] ["flatline" (font-menu-set-font "flatline" nil nil) :style radio :active nil :selected nil] ["msam10" (font-menu-set-font "msam10" nil nil) :style radio :active nil :selected nil] ["msbm10" (font-menu-set-font "msbm10" nil nil) :style radio :active nil :selected nil] ["progenisis" (font-menu-set-font "progenisis" nil nil) :style radio :active nil :selected nil] ["wasy10" (font-menu-set-font "wasy10" nil nil) :style radio :active nil :selected nil]) (["6" (font-menu-set-font nil nil 6) :style radio :active nil :selected nil] ["8" (font-menu-set-font nil nil 8) :style radio :active nil :selected nil] ["10" (font-menu-set-font nil nil 10) :style radio :active nil :selected nil] ["11" (font-menu-set-font nil nil 11) :style rad! io :active nil :selected nil] ["12" (font-menu-set-font nil ni! l 12) :s tyle radio :active nil :selected nil] ["13" (font-menu-set-font nil nil 13) :style radio :active nil :selected nil] ["14" (font-menu-set-font nil nil 14) :style radio :active nil :selected nil] ["15" (font-menu-set-font nil nil 15) :style radio :active nil :selected nil] ["16" (font-menu-set-font nil nil 16) :style radio :active nil :selected nil] ["17" (font-menu-set-font nil nil 17) :style radio :active nil :selected nil] ["18" (font-menu-set-font nil nil 18) :style radio :active nil :selected nil] ["20" (font-menu-set-font nil nil 20) :style radio :active nil :selected nil] ["22" (font-menu-set-font nil nil 22) :style radio :active nil :selected nil] ["24" (font-menu-set-font nil nil 24) :style radio :active nil :selected nil] ["30" (font-menu-set-font nil nil 30) :style radio :active nil :selected nil] ["36" (font-menu-set-font nil nil 36) :style radio :active nil :selected nil]) (["Light" (font-menu-set-font nil "Light" nil) :style radio :active nil :selected nil] ["Med! ium" (font-menu-set-font nil "Medium" nil) :style radio :active nil :selected nil] ["Demibold" (font-menu-set-font nil "Demibold" nil) :style radio :active nil :selected nil] ["Bold" (font-menu-set-font nil "Bold" nil) :style radio :active nil :selected nil] ["Black" (font-menu-set-font nil "Black" nil) :style radio :active nil :selected nil])]) apply(x-font-menu-font-data (default [(["Balker" (nil) (0) nil] ["Bitstream Charter" ("Bold" nil) (0) nil] ["Bitstream Vera Sans" ("Bold" nil) (0) nil] ["Bitstream Vera Sans Mono" ("Bold" nil) (0) nil] ["Bitstream Vera Serif" ("Bold" nil) (0) nil] ["Century Schoolbook L" ("Bold" "Medium" nil) (0) nil] ["Charter" ("Bold" "Medium" nil) (0) nil] ["Clean" (nil) (0) nil] ["ClearlyU" (nil) (0) nil] ["ClearlyU PUA" (nil) (0) nil] ["Computer Modern" ("Bold" "Medium") (0) nil] ["Computer Modern Bright" ("Bold" "Demibold" "Medium" nil) (0) nil] ["Computer Modern Concrete" ("Medium") (0) nil] ["Courier" ("Bold" "Medium" nil) (0) nil] ["Courier 10 Pitch" ("Bold" nil) (0) nil] ["Delphine" (nil) (0) nil] ["Dingbats" (nil) (0) nil] ["Domestic Manners" (nil) (0) nil] ["Dustismo" ("Bold" nil) (0) nil] ["Dustismo Roman" ("Bold" nil) (0) nil] ["El Abogado Loco" (nil) (0) nil] ["Fixed" ("Bold" "Medium" nil) (0) nil] ["FreeMono" ("Bold" nil) (0) nil] ["FreeSans" ("Bold" nil) (0) nil] ["FreeSer! if" ("Bold" nil) (0) nil] ["Helvetica" ("Bold" "Medium" nil) (0) nil] ["Hershey-Gothic-English" (nil) (0) nil] ["Hershey-Gothic-German" (nil) (0) nil] ["Hershey-Gothic-Italian" (nil) (0) nil] ["Hershey-Plain-Duplex" (nil) (0) nil] ["Hershey-Plain-Duplex-Italic" (nil) (0) nil] ["Hershey-Plain-Triplex" (nil) (0) nil] ["Hershey-Plain-Triplex-Italic" (nil) (0) nil] ["Hershey-Script-Complex" (nil) (0) nil] ["Hershey-Script-Simplex" (nil) (0) nil] ["It wasn't me" (nil) (0) nil] ["Junkyard" (nil) (0) nil] ["LMRoman10" ("Bold" "Demibold" nil) (0) nil] ["LMSans10" ("Bold" "Demibold" nil) (0) nil] ["LMTypewriter10" ("Bold" nil nil) (0) nil] ["LMTypewriterVarWd10" ("Bold" nil nil) (0) nil] ["Lucida" ("Bold" "Medium") (0) nil] ["LucidaBright" ("Medium" nil) (0) nil] ["LucidaTypewriter" ("Bold" "Medium") (0) nil] ["Marked Fool" (nil) (0) nil] ["New Century Schoolbook" ("Bold" "Medium" nil) (0) nil] ["Newspaper" (nil) (0) nil] ["Nimbus Mono L" ("Bold" nil) (0) nil] ["Nimbus Roman No9 L" ! ("Bold" nil) (0) nil] ["Nimbus Sans L" ("Bold" nil) (0) nil] [! "Penguin Attack" (nil) (0) nil] ["Steve" (nil) (0) nil] ["Swift" (nil) (0) nil] ["Terminal" ("Bold" nil) (0) nil] ["Times" ("Bold" "Medium" nil) (0) nil] ["URW Bookman L" ("Bold" "Medium" nil) (0) nil] ["URW Chancery L" ("Medium") (0) nil] ["URW Gothic L" ("Demibold" nil) (0) nil] ["URW Palladio L" ("Bold" "Medium" nil) (0) nil] ["Utopia" ("Bold" nil) (0) nil] ["Wargames" (nil) (0) nil] ["Winks" (nil) (0) nil] ["cmex10" ("Medium") (0) nil] ["cmmi10" ("Medium") (0) nil] ["cmr10" ("Medium") (0) nil] ["cmsy10" ("Medium") (0) nil] ["flatline" (nil) (0) nil] ["msam10" ("Medium") (0) nil] ["msbm10" ("Medium") (0) nil] ["progenisis" (nil) (0) nil] ["wasy10" (nil) (0) nil]) (["Balker" (font-menu-set-font "Balker" nil nil) :style radio :active nil :selected nil] ["Bitstream Charter" (font-menu-set-font "Bitstream Charter" nil nil) :style radio :active nil :selected nil] ["Bitstream Vera Sans" (font-menu-set-font "Bitstream Vera Sans" nil nil) :style radio :active nil :selected nil] ["Bitstrea! m Vera Sans Mono" (font-menu-set-font "Bitstream Vera Sans Mono" nil nil) :style radio :active nil :selected nil] ["Bitstream Vera Serif" (font-menu-set-font "Bitstream Vera Serif" nil nil) :style radio :active nil :selected nil] ["Century Schoolbook L" (font-menu-set-font "Century Schoolbook L" nil nil) :style radio :active nil :selected nil] ["Charter" (font-menu-set-font "Charter" nil nil) :style radio :active nil :selected nil] ["Clean" (font-menu-set-font "Clean" nil nil) :style radio :active nil :selected nil] ["ClearlyU" (font-menu-set-font "ClearlyU" nil nil) :style radio :active nil :selected nil] ["ClearlyU PUA" (font-menu-set-font "ClearlyU PUA" nil nil) :style radio :active nil :selected nil] ["Computer Modern" (font-menu-set-font "Computer Modern" nil nil) :style radio :active nil :selected nil] ["Computer Modern Bright" (font-menu-set-font "Computer Modern Bright" nil nil) :style radio :active nil :selected nil] ["Computer Modern Concrete" (font-menu-set-font ! "Computer Modern Concrete" nil nil) :style radio :active nil :! selected nil] ["Courier" (font-menu-set-font "Courier" nil nil) :style radio :active nil :selected nil] ["Courier 10 Pitch" (font-menu-set-font "Courier 10 Pitch" nil nil) :style radio :active nil :selected nil] ["Delphine" (font-menu-set-font "Delphine" nil nil) :style radio :active nil :selected nil] ["Dingbats" (font-menu-set-font "Dingbats" nil nil) :style radio :active nil :selected nil] ["Domestic Manners" (font-menu-set-font "Domestic Manners" nil nil) :style radio :active nil :selected nil] ["Dustismo" (font-menu-set-font "Dustismo" nil nil) :style radio :active nil :selected nil] ["Dustismo Roman" (font-menu-set-font "Dustismo Roman" nil nil) :style radio :active nil :selected nil] ["El Abogado Loco" (font-menu-set-font "El Abogado Loco" nil nil) :style radio :active nil :selected nil] ["Fixed" (font-menu-set-font "Fixed" nil nil) :style radio :active nil :selected nil] ["FreeMono" (font-menu-set-font "FreeMono" nil nil) :style radio :active nil :selected nil] ["FreeSans" (f! ont-menu-set-font "FreeSans" nil nil) :style radio :active nil :selected nil] ["FreeSerif" (font-menu-set-font "FreeSerif" nil nil) :style radio :active nil :selected nil] ["Helvetica" (font-menu-set-font "Helvetica" nil nil) :style radio :active nil :selected nil] ["Hershey-Gothic-English" (font-menu-set-font "Hershey-Gothic-English" nil nil) :style radio :active nil :selected nil] ["Hershey-Gothic-German" (font-menu-set-font "Hershey-Gothic-German" nil nil) :style radio :active nil :selected nil] ["Hershey-Gothic-Italian" (font-menu-set-font "Hershey-Gothic-Italian" nil nil) :style radio :active nil :selected nil] ["Hershey-Plain-Duplex" (font-menu-set-font "Hershey-Plain-Duplex" nil nil) :style radio :active nil :selected nil] ["Hershey-Plain-Duplex-Italic" (font-menu-set-font "Hershey-Plain-Duplex-Italic" nil nil) :style radio :active nil :selected nil] ["Hershey-Plain-Triplex" (font-menu-set-font "Hershey-Plain-Triplex" nil nil) :style radio :active nil :selected nil] ! ["Hershey-Plain-Triplex-Italic" (font-menu-set-font "Hershey-P! lain-Tri p lex-Italic" nil nil) :style radio :active nil :selected nil] ["Hershey-Script-Complex" (font-menu-set-font "Hershey-Script-Complex" nil nil) :style radio :active nil :selected nil] ["Hershey-Script-Simplex" (font-menu-set-font "Hershey-Script-Simplex" nil nil) :style radio :active nil :selected nil] ["It wasn't me" (font-menu-set-font "It wasn't me" nil nil) :style radio :active nil :selected nil] ["Junkyard" (font-menu-set-font "Junkyard" nil nil) :style radio :active nil :selected nil] ["LMRoman10" (font-menu-set-font "LMRoman10" nil nil) :style radio :active nil :selected nil] ["LMSans10" (font-menu-set-font "LMSans10" nil nil) :style radio :active nil :selected nil] ["LMTypewriter10" (font-menu-set-font "LMTypewriter10" nil nil) :style radio :active nil :selected nil] ["LMTypewriterVarWd10" (font-menu-set-font "LMTypewriterVarWd10" nil nil) :style radio :active nil :selected nil] ["Lucida" (font-menu-set-font "Lucida" nil nil) :style radio :active nil :selected nil] ["Lu! cidaBright" (font-menu-set-font "LucidaBright" nil nil) :style radio :active nil :selected nil] ["LucidaTypewriter" (font-menu-set-font "LucidaTypewriter" nil nil) :style radio :active nil :selected nil] ["Marked Fool" (font-menu-set-font "Marked Fool" nil nil) :style radio :active nil :selected nil] ["New Century Schoolbook" (font-menu-set-font "New Century Schoolbook" nil nil) :style radio :active nil :selected nil] ["Newspaper" (font-menu-set-font "Newspaper" nil nil) :style radio :active nil :selected nil] ["Nimbus Mono L" (font-menu-set-font "Nimbus Mono L" nil nil) :style radio :active nil :selected nil] ["Nimbus Roman No9 L" (font-menu-set-font "Nimbus Roman No9 L" nil nil) :style radio :active nil :selected nil] ["Nimbus Sans L" (font-menu-set-font "Nimbus Sans L" nil nil) :style radio :active nil :selected nil] ["Penguin Attack" (font-menu-set-font "Penguin Attack" nil nil) :style radio :active nil :selected nil] ["Steve" (font-menu-set-font "Steve" nil nil) :style! radio :active nil :selected nil] ["Swift" (font-menu-set-font! "Swift" nil nil) :style radio :active nil :selected nil] ["Terminal" (font-menu-set-font "Terminal" nil nil) :style radio :active nil :selected nil] ["Times" (font-menu-set-font "Times" nil nil) :style radio :active nil :selected nil] ["URW Bookman L" (font-menu-set-font "URW Bookman L" nil nil) :style radio :active nil :selected nil] ["URW Chancery L" (font-menu-set-font "URW Chancery L" nil nil) :style radio :active nil :selected nil] ["URW Gothic L" (font-menu-set-font "URW Gothic L" nil nil) :style radio :active nil :selected nil] ["URW Palladio L" (font-menu-set-font "URW Palladio L" nil nil) :style radio :active nil :selected nil] ["Utopia" (font-menu-set-font "Utopia" nil nil) :style radio :active nil :selected nil] ["Wargames" (font-menu-set-font "Wargames" nil nil) :style radio :active nil :selected nil] ["Winks" (font-menu-set-font "Winks" nil nil) :style radio :active nil :selected nil] ["cmex10" (font-menu-set-font "cmex10" nil nil) :style radio :active nil :selected nil! ] ["cmmi10" (font-menu-set-font "cmmi10" nil nil) :style radio :active nil :selected nil] ["cmr10" (font-menu-set-font "cmr10" nil nil) :style radio :active nil :selected nil] ["cmsy10" (font-menu-set-font "cmsy10" nil nil) :style radio :active nil :selected nil] ["flatline" (font-menu-set-font "flatline" nil nil) :style radio :active nil :selected nil] ["msam10" (font-menu-set-font "msam10" nil nil) :style radio :active nil :selected nil] ["msbm10" (font-menu-set-font "msbm10" nil nil) :style radio :active nil :selected nil] ["progenisis" (font-menu-set-font "progenisis" nil nil) :style radio :active nil :selected nil] ["wasy10" (font-menu-set-font "wasy10" nil nil) :style radio :active nil :selected nil]) (["6" (font-menu-set-font nil nil 6) :style radio :active nil :selected nil] ["8" (font-menu-set-font nil nil 8) :style radio :active nil :selected nil] ["10" (font-menu-set-font nil nil 10) :style radio :active nil :selected nil] ["11" (font-menu-set-font nil nil 11) :s! tyle radio :active nil :selected nil] ["12" (font-menu-set-fon! t nil ni l 12) :style radio :active nil :selected nil] ["13" (font-menu-set-font nil nil 13) :style radio :active nil :selected nil] ["14" (font-menu-set-font nil nil 14) :style radio :active nil :selected nil] ["15" (font-menu-set-font nil nil 15) :style radio :active nil :selected nil] ["16" (font-menu-set-font nil nil 16) :style radio :active nil :selected nil] ["17" (font-menu-set-font nil nil 17) :style radio :active nil :selected nil] ["18" (font-menu-set-font nil nil 18) :style radio :active nil :selected nil] ["20" (font-menu-set-font nil nil 20) :style radio :active nil :selected nil] ["22" (font-menu-set-font nil nil 22) :style radio :active nil :selected nil] ["24" (font-menu-set-font nil nil 24) :style radio :active nil :selected nil] ["30" (font-menu-set-font nil nil 30) :style radio :active nil :selected nil] ["36" (font-menu-set-font nil nil 36) :style radio :active nil :selected nil]) (["Light" (font-menu-set-font nil "Light" nil) :style radio :active nil :selected nil! ] ["Medium" (font-menu-set-font nil "Medium" nil) :style radio :active nil :selected nil] ["Demibold" (font-menu-set-font nil "Demibold" nil) :style radio :active nil :selected nil] ["Bold" (font-menu-set-font nil "Bold" nil) :style radio :active nil :selected nil] ["Black" (font-menu-set-font nil "Black" nil) :style radio :active nil :selected nil])])) # bind (devmeth args device name) call-device-method(font-menu-font-data nil default [(["Balker" (nil) (0) nil] ["Bitstream Charter" ("Bold" nil) (0) nil] ["Bitstream Vera Sans" ("Bold" nil) (0) nil] ["Bitstream Vera Sans Mono" ("Bold" nil) (0) nil] ["Bitstream Vera Serif" ("Bold" nil) (0) nil] ["Century Schoolbook L" ("Bold" "Medium" nil) (0) nil] ["Charter" ("Bold" "Medium" nil) (0) nil] ["Clean" (nil) (0) nil] ["ClearlyU" (nil) (0) nil] ["ClearlyU PUA" (nil) (0) nil] ["Computer Modern" ("Bold" "Medium") (0) nil] ["Computer Modern Bright" ("Bold" "Demibold" "Medium" nil) (0) nil] ["Computer Modern Concrete" ("Medium") (0) nil] ["Courier" ("Bold" "Medium" nil) (0) nil] ["Courier 10 Pitch" ("Bold" nil) (0) nil] ["Delphine" (nil) (0) nil] ["Dingbats" (nil) (0) nil] ["Domestic Manners" (nil) (0) nil] ["Dustismo" ("Bold" nil) (0) nil] ["Dustismo Roman" ("Bold" nil) (0) nil] ["El Abogado Loco" (nil) (0) nil] ["Fixed" ("Bold" "Medium" nil) (0) nil] ["FreeMono" ("Bold" nil) (0) nil] ["FreeSans" ("Bold" nil) (0) ! nil] ["FreeSerif" ("Bold" nil) (0) nil] ["Helvetica" ("Bold" "Medium" nil) (0) nil] ["Hershey-Gothic-English" (nil) (0) nil] ["Hershey-Gothic-German" (nil) (0) nil] ["Hershey-Gothic-Italian" (nil) (0) nil] ["Hershey-Plain-Duplex" (nil) (0) nil] ["Hershey-Plain-Duplex-Italic" (nil) (0) nil] ["Hershey-Plain-Triplex" (nil) (0) nil] ["Hershey-Plain-Triplex-Italic" (nil) (0) nil] ["Hershey-Script-Complex" (nil) (0) nil] ["Hershey-Script-Simplex" (nil) (0) nil] ["It wasn't me" (nil) (0) nil] ["Junkyard" (nil) (0) nil] ["LMRoman10" ("Bold" "Demibold" nil) (0) nil] ["LMSans10" ("Bold" "Demibold" nil) (0) nil] ["LMTypewriter10" ("Bold" nil nil) (0) nil] ["LMTypewriterVarWd10" ("Bold" nil nil) (0) nil] ["Lucida" ("Bold" "Medium") (0) nil] ["LucidaBright" ("Medium" nil) (0) nil] ["LucidaTypewriter" ("Bold" "Medium") (0) nil] ["Marked Fool" (nil) (0) nil] ["New Century Schoolbook" ("Bold" "Medium" nil) (0) nil] ["Newspaper" (nil) (0) nil] ["Nimbus Mono L" ("Bold" nil) (0) nil] ["Nimbus! Roman No9 L" ("Bold" nil) (0) nil] ["Nimbus Sans L" ("Bold" n! il) (0) n il] ["Penguin Attack" (nil) (0) nil] ["Steve" (nil) (0) nil] ["Swift" (nil) (0) nil] ["Terminal" ("Bold" nil) (0) nil] ["Times" ("Bold" "Medium" nil) (0) nil] ["URW Bookman L" ("Bold" "Medium" nil) (0) nil] ["URW Chancery L" ("Medium") (0) nil] ["URW Gothic L" ("Demibold" nil) (0) nil] ["URW Palladio L" ("Bold" "Medium" nil) (0) nil] ["Utopia" ("Bold" nil) (0) nil] ["Wargames" (nil) (0) nil] ["Winks" (nil) (0) nil] ["cmex10" ("Medium") (0) nil] ["cmmi10" ("Medium") (0) nil] ["cmr10" ("Medium") (0) nil] ["cmsy10" ("Medium") (0) nil] ["flatline" (nil) (0) nil] ["msam10" ("Medium") (0) nil] ["msbm10" ("Medium") (0) nil] ["progenisis" (nil) (0) nil] ["wasy10" (nil) (0) nil]) (["Balker" (font-menu-set-font "Balker" nil nil) :style radio :active nil :selected nil] ["Bitstream Charter" (font-menu-set-font "Bitstream Charter" nil nil) :style radio :active nil :selected nil] ["Bitstream Vera Sans" (font-menu-set-font "Bitstream Vera Sans" nil nil) :style radio :active nil :selected n! il] ["Bitstream Vera Sans Mono" (font-menu-set-font "Bitstream Vera Sans Mono" nil nil) :style radio :active nil :selected nil] ["Bitstream Vera Serif" (font-menu-set-font "Bitstream Vera Serif" nil nil) :style radio :active nil :selected nil] ["Century Schoolbook L" (font-menu-set-font "Century Schoolbook L" nil nil) :style radio :active nil :selected nil] ["Charter" (font-menu-set-font "Charter" nil nil) :style radio :active nil :selected nil] ["Clean" (font-menu-set-font "Clean" nil nil) :style radio :active nil :selected nil] ["ClearlyU" (font-menu-set-font "ClearlyU" nil nil) :style radio :active nil :selected nil] ["ClearlyU PUA" (font-menu-set-font "ClearlyU PUA" nil nil) :style radio :active nil :selected nil] ["Computer Modern" (font-menu-set-font "Computer Modern" nil nil) :style radio :active nil :selected nil] ["Computer Modern Bright" (font-menu-set-font "Computer Modern Bright" nil nil) :style radio :active nil :selected nil] ["Computer Modern Concrete" (font-! menu-set-font "Computer Modern Concrete" nil nil) :style radio! :active nil:selected nil] ["Courier" (font-menu-set-font "Courier" nil nil) :style radio :active nil :selected nil] ["Courier 10 Pitch" (font-menu-set-font "Courier 10 Pitch" nil nil) :style radio :active nil :selected nil] ["Delphine" (font-menu-set-font "Delphine" nil nil) :style radio :active nil :selected nil] ["Dingbats" (font-menu-set-font "Dingbats" nil nil) :style radio :active nil :selected nil] ["Domestic Manners" (font-menu-set-font "Domestic Manners" nil nil) :style radio :active nil :selected nil] ["Dustismo" (font-menu-set-font "Dustismo" nil nil) :style radio :active nil :selected nil] ["Dustismo Roman" (font-menu-set-font "Dustismo Roman" nil nil) :style radio :active nil :selected nil] ["El Abogado Loco" (font-menu-set-font "El Abogado Loco" nil nil) :style radio :active nil :selected nil] ["Fixed" (font-menu-set-font "Fixed" nil nil) :style radio :active nil :selected nil] ["FreeMono" (font-menu-set-font "FreeMono" nil nil) :style radio :active nil :selected nil] [! "FreeSans" (font-menu-set-font "FreeSans" nil nil) :style radio :active nil :selected nil] ["FreeSerif" (font-menu-set-font "FreeSerif" nil nil) :style radio :active nil :selected nil] ["Helvetica" (font-menu-set-font "Helvetica" nil nil) :style radio :active nil :selected nil] ["Hershey-Gothic-English" (font-menu-set-font "Hershey-Gothic-English" nil nil) :style radio :active nil :selected nil] ["Hershey-Gothic-German" (font-menu-set-font "Hershey-Gothic-German" nil nil) :style radio :active nil :selected nil] ["Hershey-Gothic-Italian" (font-menu-set-font "Hershey-Gothic-Italian" nil nil) :style radio :active nil :selected nil] ["Hershey-Plain-Duplex" (font-menu-set-font "Hershey-Plain-Duplex" nil nil) :style radio :active nil :selected nil] ["Hershey-Plain-Duplex-Italic" (font-menu-set-font "Hershey-Plain-Duplex-Italic" nil nil) :style radio :active nil :selected nil] ["Hershey-Plain-Triplex" (font-menu-set-font "Hershey-Plain-Triplex" nil nil) :style radio :active nil :s! elected nil] ["Hershey-Plain-Triplex-Italic" (font-menu-set-fo! nt "Hers hey-Plain-Triplex-Italic" nil nil) :style radio :active nil :selected nil] ["Hershey-Script-Complex" (font-menu-set-font "Hershey-Script-Complex" nil nil) :style radio :active nil :selected nil] ["Hershey-Script-Simplex" (font-menu-set-font "Hershey-Script-Simplex" nil nil) :style radio :active nil :selected nil] ["It wasn't me" (font-menu-set-font "It wasn't me" nil nil) :style radio :active nil :selected nil] ["Junkyard" (font-menu-set-font "Junkyard" nil nil) :style radio :active nil :selected nil] ["LMRoman10" (font-menu-set-font "LMRoman10" nil nil) :style radio :active nil :selected nil] ["LMSans10" (font-menu-set-font "LMSans10" nil nil) :style radio :active nil :selected nil] ["LMTypewriter10" (font-menu-set-font "LMTypewriter10" nil nil) :style radio :active nil :selected nil] ["LMTypewriterVarWd10" (font-menu-set-font "LMTypewriterVarWd10" nil nil) :style radio :active nil :selected nil] ["Lucida" (font-menu-set-font "Lucida" nil nil) :style radio :active nil :sele! cted nil] ["LucidaBright" (font-menu-set-font "LucidaBright" nil nil) :style radio :active nil :selected nil] ["LucidaTypewriter" (font-menu-set-font "LucidaTypewriter" nil nil) :style radio :active nil :selected nil] ["Marked Fool" (font-menu-set-font "Marked Fool" nil nil) :style radio :active nil :selected nil] ["New Century Schoolbook" (font-menu-set-font "New Century Schoolbook" nil nil) :style radio :active nil :selected nil] ["Newspaper" (font-menu-set-font "Newspaper" nil nil) :style radio :active nil :selected nil] ["Nimbus Mono L" (font-menu-set-font "Nimbus Mono L" nil nil) :style radio :active nil :selected nil] ["Nimbus Roman No9 L" (font-menu-set-font "Nimbus Roman No9 L" nil nil) :style radio :active nil :selected nil] ["Nimbus Sans L" (font-menu-set-font "Nimbus Sans L" nil nil) :style radio :active nil :selected nil] ["Penguin Attack" (font-menu-set-font "Penguin Attack" nil nil) :style radio :active nil :selected nil] ["Steve" (font-menu-set-font "Steve" n! il nil) :style radio :active nil :selected nil] ["Swift" (font! -menu-se t -font "Swift" nil nil) :style radio :active nil :selected nil] ["Terminal" (font-menu-set-font "Terminal" nil nil) :style radio :active nil :selected nil] ["Times" (font-menu-set-font "Times" nil nil) :style radio :active nil :selected nil] ["URW Bookman L" (font-menu-set-font "URW Bookman L" nil nil) :style radio :active nil :selected nil] ["URW Chancery L" (font-menu-set-font "URW Chancery L" nil nil) :style radio :active nil :selected nil] ["URW Gothic L" (font-menu-set-font "URW Gothic L" nil nil) :style radio :active nil :selected nil] ["URW Palladio L" (font-menu-set-font "URW Palladio L" nil nil) :style radio :active nil :selected nil] ["Utopia" (font-menu-set-font "Utopia" nil nil) :style radio :active nil :selected nil] ["Wargames" (font-menu-set-font "Wargames" nil nil) :style radio :active nil :selected nil] ["Winks" (font-menu-set-font "Winks" nil nil) :style radio :active nil :selected nil] ["cmex10" (font-menu-set-font "cmex10" nil nil) :style radio :active nil! :selected nil] ["cmmi10" (font-menu-set-font "cmmi10" nil nil) :style radio :active nil :selected nil] ["cmr10" (font-menu-set-font "cmr10" nil nil) :style radio :active nil :selected nil] ["cmsy10" (font-menu-set-font "cmsy10" nil nil) :style radio :active nil :selected nil] ["flatline" (font-menu-set-font "flatline" nil nil) :style radio :active nil :selected nil] ["msam10" (font-menu-set-font "msam10" nil nil) :style radio :active nil :selected nil] ["msbm10" (font-menu-set-font "msbm10" nil nil) :style radio :active nil :selected nil] ["progenisis" (font-menu-set-font "progenisis" nil nil) :style radio :active nil :selected nil] ["wasy10" (font-menu-set-font "wasy10" nil nil) :style radio :active nil :selected nil]) (["6" (font-menu-set-font nil nil 6) :style radio :active nil :selected nil] ["8" (font-menu-set-font nil nil 8) :style radio :active nil :selected nil] ["10" (font-menu-set-font nil nil 10) :style radio :active nil :selected nil] ["11" (font-menu-set-font ! nil nil 11) :style radio :active nil :selected nil] ["12" (fon! t-menu-s e t-font nil nil 12) :style radio :active nil :selected nil] ["13" (font-menu-set-font nil nil 13) :style radio :active nil :selected nil] ["14" (font-menu-set-font nil nil 14) :style radio :active nil :selected nil] ["15" (font-menu-set-font nil nil 15) :style radio :active nil :selected nil] ["16" (font-menu-set-font nil nil 16) :style radio :active nil :selected nil] ["17" (font-menu-set-font nil nil 17) :style radio :active nil :selected nil] ["18" (font-menu-set-font nil nil 18) :style radio :active nil :selected nil] ["20" (font-menu-set-font nil nil 20) :style radio :active nil :selected nil] ["22" (font-menu-set-font nil nil 22) :style radio :active nil :selected nil] ["24" (font-menu-set-font nil nil 24) :style radio :active nil :selected nil] ["30" (font-menu-set-font nil nil 30) :style radio :active nil :selected nil] ["36" (font-menu-set-font nil nil 36) :style radio :active nil :selected nil]) (["Light" (font-menu-set-font nil "Light" nil) :style radio :active nil! :selected nil] ["Medium" (font-menu-set-font nil "Medium" nil) :style radio :active nil :selected nil] ["Demibold" (font-menu-set-font nil "Demibold" nil) :style radio :active nil :selected nil] ["Bold" (font-menu-set-font nil "Bold" nil) :style radio :active nil :selected nil] ["Black" (font-menu-set-font nil "Black" nil) :style radio :active nil :selected nil])]) apply(call-device-method font-menu-font-data nil (default [(["Balker" (nil) (0) nil] ["Bitstream Charter" ("Bold" nil) (0) nil] ["Bitstream Vera Sans" ("Bold" nil) (0) nil] ["Bitstream Vera Sans Mono" ("Bold" nil) (0) nil] ["Bitstream Vera Serif" ("Bold" nil) (0) nil] ["Century Schoolbook L" ("Bold" "Medium" nil) (0) nil] ["Charter" ("Bold" "Medium" nil) (0) nil] ["Clean" (nil) (0) nil] ["ClearlyU" (nil) (0) nil] ["ClearlyU PUA" (nil) (0) nil] ["Computer Modern" ("Bold" "Medium") (0) nil] ["Computer Modern Bright" ("Bold" "Demibold" "Medium" nil) (0) nil] ["Computer Modern Concrete" ("Medium") (0) nil] ["Courier" ("Bold" "Medium" nil) (0) nil] ["Courier 10 Pitch" ("Bold" nil) (0) nil] ["Delphine" (nil) (0) nil] ["Dingbats" (nil) (0) nil] ["Domestic Manners" (nil) (0) nil] ["Dustismo" ("Bold" nil) (0) nil] ["Dustismo Roman" ("Bold" nil) (0) nil] ["El Abogado Loco" (nil) (0) nil] ["Fixed" ("Bold" "Medium" nil) (0) nil] ["FreeMono" ("Bold" nil) (0) nil] ["FreeSans" ("Bold" ni! l) (0) nil] ["FreeSerif" ("Bold" nil) (0) nil] ["Helvetica" ("Bold" "Medium" nil) (0) nil] ["Hershey-Gothic-English" (nil) (0) nil] ["Hershey-Gothic-German" (nil) (0) nil] ["Hershey-Gothic-Italian" (nil) (0) nil] ["Hershey-Plain-Duplex" (nil) (0) nil] ["Hershey-Plain-Duplex-Italic" (nil) (0) nil] ["Hershey-Plain-Triplex" (nil) (0) nil] ["Hershey-Plain-Triplex-Italic" (nil) (0) nil] ["Hershey-Script-Complex" (nil) (0) nil] ["Hershey-Script-Simplex" (nil) (0) nil] ["It wasn't me" (nil) (0) nil] ["Junkyard" (nil) (0) nil] ["LMRoman10" ("Bold" "Demibold" nil) (0) nil] ["LMSans10" ("Bold" "Demibold" nil) (0) nil] ["LMTypewriter10" ("Bold" nil nil) (0) nil] ["LMTypewriterVarWd10" ("Bold" nil nil) (0) nil] ["Lucida" ("Bold" "Medium") (0) nil] ["LucidaBright" ("Medium" nil) (0) nil] ["LucidaTypewriter" ("Bold" "Medium") (0) nil] ["Marked Fool" (nil) (0) nil] ["New Century Schoolbook" ("Bold" "Medium" nil) (0) nil] ["Newspaper" (nil) (0) nil] ["Nimbus Mono L" ("Bold" nil) (0) nil] [! "Nimbus Roman No9 L" ("Bold" nil) (0) nil] ["Nimbus Sans L" ("! Bold" ni l ) (0) nil] ["Penguin Attack" (nil) (0) nil] ["Steve" (nil) (0) nil] ["Swift" (nil) (0) nil] ["Terminal" ("Bold" nil) (0) nil] ["Times" ("Bold" "Medium" nil) (0) nil] ["URW Bookman L" ("Bold" "Medium" nil) (0) nil] ["URW Chancery L" ("Medium") (0) nil] ["URW Gothic L" ("Demibold" nil) (0) nil] ["URW Palladio L" ("Bold" "Medium" nil) (0) nil] ["Utopia" ("Bold" nil) (0) nil] ["Wargames" (nil) (0) nil] ["Winks" (nil) (0) nil] ["cmex10" ("Medium") (0) nil] ["cmmi10" ("Medium") (0) nil] ["cmr10" ("Medium") (0) nil] ["cmsy10" ("Medium") (0) nil] ["flatline" (nil) (0) nil] ["msam10" ("Medium") (0) nil] ["msbm10" ("Medium") (0) nil] ["progenisis" (nil) (0) nil] ["wasy10" (nil) (0) nil]) (["Balker" (font-menu-set-font "Balker" nil nil) :style radio :active nil :selected nil] ["Bitstream Charter" (font-menu-set-font "Bitstream Charter" nil nil) :style radio :active nil :selected nil] ["Bitstream Vera Sans" (font-menu-set-font "Bitstream Vera Sans" nil nil) :style radio :active nil :sel! ected nil] ["Bitstream Vera Sans Mono" (font-menu-set-font "Bitstream Vera Sans Mono" nil nil) :style radio :active nil :selected nil] ["Bitstream Vera Serif" (font-menu-set-font "Bitstream Vera Serif" nil nil) :style radio :active nil :selected nil] ["Century Schoolbook L" (font-menu-set-font "Century Schoolbook L" nil nil) :style radio :active nil :selected nil] ["Charter" (font-menu-set-font "Charter" nil nil) :style radio :active nil :selected nil] ["Clean" (font-menu-set-font "Clean" nil nil) :style radio :active nil :selected nil] ["ClearlyU" (font-menu-set-font "ClearlyU" nil nil) :style radio :active nil :selected nil] ["ClearlyU PUA" (font-menu-set-font "ClearlyU PUA" nil nil) :style radio :active nil :selected nil] ["Computer Modern" (font-menu-set-font "Computer Modern" nil nil) :style radio :active nil :selected nil] ["Computer Modern Bright" (font-menu-set-font "Computer Modern Bright" nil nil) :style radio :active nil :selected nil] ["Computer Modern Concrete"! (font-menu-set-font "Computer Modern Concrete" nil nil) :styl! e radio : active nil :selected nil] ["Courier" (font-menu-set-font "Courier" nil nil) :style radio :active nil :selected nil] ["Courier 10 Pitch" (font-menu-set-font "Courier 10 Pitch" nil nil) :style radio :active nil :selected nil] ["Delphine" (font-menu-set-font "Delphine" nil nil) :style radio :active nil :selected nil] ["Dingbats" (font-menu-set-font "Dingbats" nil nil) :style radio :active nil :selected nil] ["Domestic Manners" (font-menu-set-font "Domestic Manners" nil nil) :style radio :active nil :selected nil] ["Dustismo" (font-menu-set-font "Dustismo" nil nil) :style radio :active nil :selected nil] ["Dustismo Roman" (font-menu-set-font "Dustismo Roman" nil nil) :style radio :active nil :selected nil] ["El Abogado Loco" (font-menu-set-font "El Abogado Loco" nil nil) :style radio :active nil :selected nil] ["Fixed" (font-menu-set-font "Fixed" nil nil) :style radio :active nil :selected nil] ["FreeMono" (font-menu-set-font "FreeMono" nil nil) :style radio :active nil :selecte! d nil] ["FreeSans" (font-menu-set-font "FreeSans" nil nil) :style radio :active nil :selected nil] ["FreeSerif" (font-menu-set-font "FreeSerif" nil nil) :style radio :active nil :selected nil] ["Helvetica" (font-menu-set-font "Helvetica" nil nil) :style radio :active nil :selected nil] ["Hershey-Gothic-English" (font-menu-set-font "Hershey-Gothic-English" nil nil) :style radio :active nil :selected nil] ["Hershey-Gothic-German" (font-menu-set-font "Hershey-Gothic-German" nil nil) :style radio :active nil :selected nil] ["Hershey-Gothic-Italian" (font-menu-set-font "Hershey-Gothic-Italian" nil nil) :style radio :active nil :selected nil] ["Hershey-Plain-Duplex" (font-menu-set-font "Hershey-Plain-Duplex" nil nil) :style radio :active nil :selected nil] ["Hershey-Plain-Duplex-Italic" (font-menu-set-font "Hershey-Plain-Duplex-Italic" nil nil) :style radio :active nil :selected nil] ["Hershey-Plain-Triplex" (font-menu-set-font "Hershey-Plain-Triplex" nil nil) :style radio :activ! e nil :selected nil] ["Hershey-Plain-Triplex-Italic" (font-men! u-set-fo n t "Hershey-Plain-Triplex-Italic" nil nil) :style radio :active nil :selected nil] ["Hershey-Script-Complex" (font-menu-set-font "Hershey-Script-Complex" nil nil) :style radio :active nil :selected nil] ["Hershey-Script-Simplex" (font-menu-set-font "Hershey-Script-Simplex" nil nil) :style radio :active nil :selected nil] ["It wasn't me" (font-menu-set-font "It wasn't me" nil nil) :style radio :active nil :selected nil] ["Junkyard" (font-menu-set-font "Junkyard" nil nil) :style radio :active nil :selected nil] ["LMRoman10" (font-menu-set-font "LMRoman10" nil nil) :style radio :active nil :selected nil] ["LMSans10" (font-menu-set-font "LMSans10" nil nil) :style radio :active nil :selected nil] ["LMTypewriter10" (font-menu-set-font "LMTypewriter10" nil nil) :style radio :active nil :selected nil] ["LMTypewriterVarWd10" (font-menu-set-font "LMTypewriterVarWd10" nil nil) :style radio :active nil :selected nil] ["Lucida" (font-menu-set-font "Lucida" nil nil) :style radio :active ni! l :selected nil] ["LucidaBright" (font-menu-set-font "LucidaBright" nil nil) :style radio :active nil :selected nil] ["LucidaTypewriter" (font-menu-set-font "LucidaTypewriter" nil nil) :style radio :active nil :selected nil] ["Marked Fool" (font-menu-set-font "Marked Fool" nil nil) :style radio :active nil :selected nil] ["New Century Schoolbook" (font-menu-set-font "New Century Schoolbook" nil nil) :style radio :active nil :selected nil] ["Newspaper" (font-menu-set-font "Newspaper" nil nil) :style radio :active nil :selected nil] ["Nimbus Mono L" (font-menu-set-font "Nimbus Mono L" nil nil) :style radio :active nil :selected nil] ["Nimbus Roman No9 L" (font-menu-set-font "Nimbus Roman No9 L" nil nil) :style radio :active nil :selected nil] ["Nimbus Sans L" (font-menu-set-font "Nimbus Sans L" nil nil) :style radio :active nil :selected nil] ["Penguin Attack" (font-menu-set-font "Penguin Attack" nil nil) :style radio :active nil :selected nil] ["Steve" (font-menu-set-font "S! teve" nil nil) :style radio :active nil :selected nil] ["Swift! " (font- m enu-set-font "Swift" nil nil) :style radio :active nil :selected nil] ["Terminal" (font-menu-set-font "Terminal" nil nil) :style radio :active nil :selected nil] ["Times" (font-menu-set-font "Times" nil nil) :style radio :active nil :selected nil] ["URW Bookman L" (font-menu-set-font "URW Bookman L" nil nil) :style radio :active nil :selected nil] ["URW Chancery L" (font-menu-set-font "URW Chancery L" nil nil) :style radio :active nil :selected nil] ["URW Gothic L" (font-menu-set-font "URW Gothic L" nil nil) :style radio :active nil :selected nil] ["URW Palladio L" (font-menu-set-font "URW Palladio L" nil nil) :style radio :active nil :selected nil] ["Utopia" (font-menu-set-font "Utopia" nil nil) :style radio :active nil :selected nil] ["Wargames" (font-menu-set-font "Wargames" nil nil) :style radio :active nil :selected nil] ["Winks" (font-menu-set-font "Winks" nil nil) :style radio :active nil :selected nil] ["cmex10" (font-menu-set-font "cmex10" nil nil) :style radio :act! ive nil :selected nil] ["cmmi10" (font-menu-set-font "cmmi10" nil nil) :style radio :active nil :selected nil] ["cmr10" (font-menu-set-font "cmr10" nil nil) :style radio :active nil :selected nil] ["cmsy10" (font-menu-set-font "cmsy10" nil nil) :style radio :active nil :selected nil] ["flatline" (font-menu-set-font "flatline" nil nil) :style radio :active nil :selected nil] ["msam10" (font-menu-set-font "msam10" nil nil) :style radio :active nil :selected nil] ["msbm10" (font-menu-set-font "msbm10" nil nil) :style radio :active nil :selected nil] ["progenisis" (font-menu-set-font "progenisis" nil nil) :style radio :active nil :selected nil] ["wasy10" (font-menu-set-font "wasy10" nil nil) :style radio :active nil :selected nil]) (["6" (font-menu-set-font nil nil 6) :style radio :active nil :selected nil] ["8" (font-menu-set-font nil nil 8) :style radio :active nil :selected nil] ["10" (font-menu-set-font nil nil 10) :style radio :active nil :selected nil] ["11" (font-menu-se! t-font nil nil 11) :style radio :active nil :selected nil] ["1! 2" (font - menu-set-font nil nil 12) :style radio :active nil :selected nil] ["13" (font-menu-set-font nil nil 13) :style radio :active nil :selected nil] ["14" (font-menu-set-font nil nil 14) :style radio :active nil :selected nil] ["15" (font-menu-set-font nil nil 15) :style radio :active nil :selected nil] ["16" (font-menu-set-font nil nil 16) :style radio :active nil :selected nil] ["17" (font-menu-set-font nil nil 17) :style radio :active nil :selected nil] ["18" (font-menu-set-font nil nil 18) :style radio :active nil :selected nil] ["20" (font-menu-set-font nil nil 20) :style radio :active nil :selected nil] ["22" (font-menu-set-font nil nil 22) :style radio :active nil :selected nil] ["24" (font-menu-set-font nil nil 24) :style radio :active nil :selected nil] ["30" (font-menu-set-font nil nil 30) :style radio :active nil :selected nil] ["36" (font-menu-set-font nil nil 36) :style radio :active nil :selected nil]) (["Light" (font-menu-set-font nil "Light" nil) :style radio :act! ive nil :selected nil] ["Medium" (font-menu-set-font nil "Medium" nil) :style radio :active nil :selected nil] ["Demibold" (font-menu-set-font nil "Demibold" nil) :style radio :active nil :selected nil] ["Bold" (font-menu-set-font nil "Bold" nil) :style radio :active nil :selected nil] ["Black" (font-menu-set-font nil "Black" nil) :style radio :active nil :selected nil])])) # bind (arglist) font-menu-font-data(default [(["Balker" (nil) (0) nil] ["Bitstream Charter" ("Bold" nil) (0) nil] ["Bitstream Vera Sans" ("Bold" nil) (0) nil] ["Bitstream Vera Sans Mono" ("Bold" nil) (0) nil] ["Bitstream Vera Serif" ("Bold" nil) (0) nil] ["Century Schoolbook L" ("Bold" "Medium" nil) (0) nil] ["Charter" ("Bold" "Medium" nil) (0) nil] ["Clean" (nil) (0) nil] ["ClearlyU" (nil) (0) nil] ["ClearlyU PUA" (nil) (0) nil] ["Computer Modern" ("Bold" "Medium") (0) nil] ["Computer Modern Bright" ("Bold" "Demibold" "Medium" nil) (0) nil] ["Computer Modern Concrete" ("Medium") (0) nil] ["Courier" ("Bold" "Medium" nil) (0) nil] ["Courier 10 Pitch" ("Bold" nil) (0) nil] ["Delphine" (nil) (0) nil] ["Dingbats" (nil) (0) nil] ["Domestic Manners" (nil) (0) nil] ["Dustismo" ("Bold" nil) (0) nil] ["Dustismo Roman" ("Bold" nil) (0) nil] ["El Abogado Loco" (nil) (0) nil] ["Fixed" ("Bold" "Medium" nil) (0) nil] ["FreeMono" ("Bold" nil) (0) nil] ["FreeSans" ("Bold" nil) (0) nil] ["FreeSerif" ("Bol! d" nil) (0) nil] ["Helvetica" ("Bold" "Medium" nil) (0) nil] ["Hershey-Gothic-English" (nil) (0) nil] ["Hershey-Gothic-German" (nil) (0) nil] ["Hershey-Gothic-Italian" (nil) (0) nil] ["Hershey-Plain-Duplex" (nil) (0) nil] ["Hershey-Plain-Duplex-Italic" (nil) (0) nil] ["Hershey-Plain-Triplex" (nil) (0) nil] ["Hershey-Plain-Triplex-Italic" (nil) (0) nil] ["Hershey-Script-Complex" (nil) (0) nil] ["Hershey-Script-Simplex" (nil) (0) nil] ["It wasn't me" (nil) (0) nil] ["Junkyard" (nil) (0) nil] ["LMRoman10" ("Bold" "Demibold" nil) (0) nil] ["LMSans10" ("Bold" "Demibold" nil) (0) nil] ["LMTypewriter10" ("Bold" nil nil) (0) nil] ["LMTypewriterVarWd10" ("Bold" nil nil) (0) nil] ["Lucida" ("Bold" "Medium") (0) nil] ["LucidaBright" ("Medium" nil) (0) nil] ["LucidaTypewriter" ("Bold" "Medium") (0) nil] ["Marked Fool" (nil) (0) nil] ["New Century Schoolbook" ("Bold" "Medium" nil) (0) nil] ["Newspaper" (nil) (0) nil] ["Nimbus Mono L" ("Bold" nil) (0) nil] ["Nimbus Roman No9 L" ("Bold" n! il) (0) nil] ["Nimbus Sans L" ("Bold" nil) (0) nil] ["Penguin ! Attack" ( nil) (0) nil] ["Steve" (nil) (0) nil] ["Swift" (nil) (0) nil] ["Terminal" ("Bold" nil) (0) nil] ["Times" ("Bold" "Medium" nil) (0) nil] ["URW Bookman L" ("Bold" "Medium" nil) (0) nil] ["URW Chancery L" ("Medium") (0) nil] ["URW Gothic L" ("Demibold" nil) (0) nil] ["URW Palladio L" ("Bold" "Medium" nil) (0) nil] ["Utopia" ("Bold" nil) (0) nil] ["Wargames" (nil) (0) nil] ["Winks" (nil) (0) nil] ["cmex10" ("Medium") (0) nil] ["cmmi10" ("Medium") (0) nil] ["cmr10" ("Medium") (0) nil] ["cmsy10" ("Medium") (0) nil] ["flatline" (nil) (0) nil] ["msam10" ("Medium") (0) nil] ["msbm10" ("Medium") (0) nil] ["progenisis" (nil) (0) nil] ["wasy10" (nil) (0) nil]) (["Balker" (font-menu-set-font "Balker" nil nil) :style radio :active nil :selected nil] ["Bitstream Charter" (font-menu-set-font "Bitstream Charter" nil nil) :style radio :active nil :selected nil] ["Bitstream Vera Sans" (font-menu-set-font "Bitstream Vera Sans" nil nil) :style radio :active nil :selected nil] ["Bitstream Vera Sa! ns Mono" (font-menu-set-font "Bitstream Vera Sans Mono" nil nil) :style radio :active nil :selected nil] ["Bitstream Vera Serif" (font-menu-set-font "Bitstream Vera Serif" nil nil) :style radio :active nil :selected nil] ["Century Schoolbook L" (font-menu-set-font "Century Schoolbook L" nil nil) :style radio :active nil :selected nil] ["Charter" (font-menu-set-font "Charter" nil nil) :style radio :active nil :selected nil] ["Clean" (font-menu-set-font "Clean" nil nil) :style radio :active nil :selected nil] ["ClearlyU" (font-menu-set-font "ClearlyU" nil nil) :style radio :active nil :selected nil] ["ClearlyU PUA" (font-menu-set-font "ClearlyU PUA" nil nil) :style radio :active nil :selected nil] ["Computer Modern" (font-menu-set-font "Computer Modern" nil nil) :style radio :active nil :selected nil] ["Computer Modern Bright" (font-menu-set-font "Computer Modern Bright" nil nil) :style radio :active nil :selected nil] ["Computer Modern Concrete" (font-menu-set-font "Computer! Modern Concrete" nil nil) :style radio :active nil :selected ! nil] ["C o urier" (font-menu-set-font "Courier" nil nil) :style radio :active nil :selected nil] ["Courier 10 Pitch" (font-menu-set-font "Courier 10 Pitch" nil nil) :style radio :active nil :selected nil] ["Delphine" (font-menu-set-font "Delphine" nil nil) :style radio :active nil :selected nil] ["Dingbats" (font-menu-set-font "Dingbats" nil nil) :style radio :active nil :selected nil] ["Domestic Manners" (font-menu-set-font "Domestic Manners" nil nil) :style radio :active nil :selected nil] ["Dustismo" (font-menu-set-font "Dustismo" nil nil) :style radio :active nil :selected nil] ["Dustismo Roman" (font-menu-set-font "Dustismo Roman" nil nil) :style radio :active nil :selected nil] ["El Abogado Loco" (font-menu-set-font "El Abogado Loco" nil nil) :style radio :active nil :selected nil] ["Fixed" (font-menu-set-font "Fixed" nil nil) :style radio :active nil :selected nil] ["FreeMono" (font-menu-set-font "FreeMono" nil nil) :style radio :active nil :selected nil] ["FreeSans" (font-menu-! set-font "FreeSans" nil nil) :style radio :active nil :selected nil] ["FreeSerif" (font-menu-set-font "FreeSerif" nil nil) :style radio :active nil :selected nil] ["Helvetica" (font-menu-set-font "Helvetica" nil nil) :style radio :active nil :selected nil] ["Hershey-Gothic-English" (font-menu-set-font "Hershey-Gothic-English" nil nil) :style radio :active nil :selected nil] ["Hershey-Gothic-German" (font-menu-set-font "Hershey-Gothic-German" nil nil) :style radio :active nil :selected nil] ["Hershey-Gothic-Italian" (font-menu-set-font "Hershey-Gothic-Italian" nil nil) :style radio :active nil :selected nil] ["Hershey-Plain-Duplex" (font-menu-set-font "Hershey-Plain-Duplex" nil nil) :style radio :active nil :selected nil] ["Hershey-Plain-Duplex-Italic" (font-menu-set-font "Hershey-Plain-Duplex-Italic" nil nil) :style radio :active nil :selected nil] ["Hershey-Plain-Triplex" (font-menu-set-font "Hershey-Plain-Triplex" nil nil) :style radio :active nil :selected nil] ["Hershey! -Plain-Triplex-Italic" (font-menu-set-font "Hershey-Plain-Trip! lex-Ital i c" nil nil) :style radio :active nil :selected nil] ["Hershey-Script-Complex" (font-menu-set-font "Hershey-Script-Complex" nil nil) :style radio :active nil :selected nil] ["Hershey-Script-Simplex" (font-menu-set-font "Hershey-Script-Simplex" nil nil) :style radio :active nil :selected nil] ["It wasn't me" (font-menu-set-font "It wasn't me" nil nil) :style radio :active nil :selected nil] ["Junkyard" (font-menu-set-font "Junkyard" nil nil) :style radio :active nil :selected nil] ["LMRoman10" (font-menu-set-font "LMRoman10" nil nil) :style radio :active nil :selected nil] ["LMSans10" (font-menu-set-font "LMSans10" nil nil) :style radio :active nil :selected nil] ["LMTypewriter10" (font-menu-set-font "LMTypewriter10" nil nil) :style radio :active nil :selected nil] ["LMTypewriterVarWd10" (font-menu-set-font "LMTypewriterVarWd10" nil nil) :style radio :active nil :selected nil] ["Lucida" (font-menu-set-font "Lucida" nil nil) :style radio :active nil :selected nil] ["LucidaBrigh! t" (font-menu-set-font "LucidaBright" nil nil) :style radio :active nil :selected nil] ["LucidaTypewriter" (font-menu-set-font "LucidaTypewriter" nil nil) :style radio :active nil :selected nil] ["Marked Fool" (font-menu-set-font "Marked Fool" nil nil) :style radio :active nil :selected nil] ["New Century Schoolbook" (font-menu-set-font "New Century Schoolbook" nil nil) :style radio :active nil :selected nil] ["Newspaper" (font-menu-set-font "Newspaper" nil nil) :style radio :active nil :selected nil] ["Nimbus Mono L" (font-menu-set-font "Nimbus Mono L" nil nil) :style radio :active nil :selected nil] ["Nimbus Roman No9 L" (font-menu-set-font "Nimbus Roman No9 L" nil nil) :style radio :active nil :selected nil] ["Nimbus Sans L" (font-menu-set-font "Nimbus Sans L" nil nil) :style radio :active nil :selected nil] ["Penguin Attack" (font-menu-set-font "Penguin Attack" nil nil) :style radio :active nil :selected nil] ["Steve" (font-menu-set-font "Steve" nil nil) :style radio :a! ctive nil :selected nil] ["Swift" (font-menu-set-font "Swift" ! nil nil) :style radio :active nil :selected nil] ["Terminal" (font-menu-set-font "Terminal" nil nil) :style radio :active nil :selected nil] ["Times" (font-menu-set-font "Times" nil nil) :style radio :active nil :selected nil] ["URW Bookman L" (font-menu-set-font "URW Bookman L" nil nil) :style radio :active nil :selected nil] ["URW Chancery L" (font-menu-set-font "URW Chancery L" nil nil) :style radio :active nil :selected nil] ["URW Gothic L" (font-menu-set-font "URW Gothic L" nil nil) :style radio :active nil :selected nil] ["URW Palladio L" (font-menu-set-font "URW Palladio L" nil nil) :style radio :active nil :selected nil] ["Utopia" (font-menu-set-font "Utopia" nil nil) :style radio :active nil :selected nil] ["Wargames" (font-menu-set-font "Wargames" nil nil) :style radio :active nil :selected nil] ["Winks" (font-menu-set-font "Winks" nil nil) :style radio :active nil :selected nil] ["cmex10" (font-menu-set-font "cmex10" nil nil) :style radio :active nil :selected nil] ["cmmi1! 0" (font-menu-set-font "cmmi10" nil nil) :style radio :active nil :selected nil] ["cmr10" (font-menu-set-font "cmr10" nil nil) :style radio :active nil :selected nil] ["cmsy10" (font-menu-set-font "cmsy10" nil nil) :style radio :active nil :selected nil] ["flatline" (font-menu-set-font "flatline" nil nil) :style radio :active nil :selected nil] ["msam10" (font-menu-set-font "msam10" nil nil) :style radio :active nil :selected nil] ["msbm10" (font-menu-set-font "msbm10" nil nil) :style radio :active nil :selected nil] ["progenisis" (font-menu-set-font "progenisis" nil nil) :style radio :active nil :selected nil] ["wasy10" (font-menu-set-font "wasy10" nil nil) :style radio :active nil :selected nil]) (["6" (font-menu-set-font nil nil 6) :style radio :active nil :selected nil] ["8" (font-menu-set-font nil nil 8) :style radio :active nil :selected nil] ["10" (font-menu-set-font nil nil 10) :style radio :active nil :selected nil] ["11" (font-menu-set-font nil nil 11) :style radi! o :active nil :selected nil] ["12" (font-menu-set-font nil nil! 12) :st y le radio :active nil :selected nil] ["13" (font-menu-set-font nil nil 13) :style radio :active nil :selected nil] ["14" (font-menu-set-font nil nil 14) :style radio :active nil :selected nil] ["15" (font-menu-set-font nil nil 15) :style radio :active nil :selected nil] ["16" (font-menu-set-font nil nil 16) :style radio :active nil :selected nil] ["17" (font-menu-set-font nil nil 17) :style radio :active nil :selected nil] ["18" (font-menu-set-font nil nil 18) :style radio :active nil :selected nil] ["20" (font-menu-set-font nil nil 20) :style radio :active nil :selected nil] ["22" (font-menu-set-font nil nil 22) :style radio :active nil :selected nil] ["24" (font-menu-set-font nil nil 24) :style radio :active nil :selected nil] ["30" (font-menu-set-font nil nil 30) :style radio :active nil :selected nil] ["36" (font-menu-set-font nil nil 36) :style radio :active nil :selected nil]) (["Light" (font-menu-set-font nil "Light" nil) :style radio :active nil :selected nil] ["Mediu! m" (font-menu-set-font nil "Medium" nil) :style radio :active nil :selected nil] ["Demibold" (font-menu-set-font nil "Demibold" nil) :style radio :active nil :selected nil] ["Bold" (font-menu-set-font nil "Bold" nil) :style radio :active nil :selected nil] ["Black" (font-menu-set-font nil "Black" nil) :style radio :active nil :selected nil])]) # bind (dcache) byte-code("..." [size entry family device-fonts-cache dcache font-data console-on-window-system-p throw menu (["Cannot parse current font" ding nil]) selected-device reset-device-font-menus font-menu-font-data default 0 1 2 3 nil (["Cannot parse current font" ding nil]) menu-split-long-menu mapcar #<compiled-function (item) "...(73)" [size weight dcache f entry item menu-item-strip-accelerator-spec 0 vassoc 1 "" 2 enable-menu-item disable-menu-item select-toggle-menu-item deselect-toggle-menu-item font-menu-ignore-scaled-fonts family] 4> weight f] 6) # (catch menu ...) # bind (ignored) font-menu-family-constructor(nil) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) # (catch #<INTERNAL OBJECT (XEmacs bug?) (opaque, size=0) 0x855b320> ...) # (unwind-protect ...) # bind (inhibit-quit) # (unwind-protect ...) # (unwind-protect ...) ("next_event_internal()" "[internal]") # (unwind-protect ...) # bind (inhibit-quit) (next-event "[internal]") # (condition-case ... . error) # (catch top-level ...)