More on make-face-larger

I traced it down to frob-face-property, where I broke a bunch of legs on my code walk-through. If anybody can read this function, that'd be great. Here's what I got. xemacs -q (specifier-spec-list (face-font 'default)) => nil (make-face-larger 'default nil) ;; nothing changes really (specifier-spec-list (face-font 'default)) => nil (make-face-larger 'default (selected-device)) ;; Zoom! (specifier-spec-list (face-font 'default)) => (#<mswindows-device 0x1b04> (nil . #<font-instance "Courier New:Regular:11::Western" on #<mswindows-device 0x1b04> 0x980a1653 0x1fb1>))) (make-face-larger 'default nil) ;; Zoom again => ((#<mswindows-device 0x1b04> (nil . #<font-instance "Courier New:Regular:12::Western" on #<mswindows-device 0x1b04> 0x100a0494 0x2117>))) Anybody understand what is going on? Big K