three or four MacOS font bugs

[Devon Sean McCullough]

MacOS fixed width fonts tickle Emacs display bugs.
I didn't try proportional fonts.

Monaco is the default but leaves screen turds.
vt100 is completely unusable due to display bugs.
#pc“¸í“Á¶ display bugs and illegible; horizontals vanish entirely.
Courier seems to work correctly but best avoid fonts with serifs.
Andale Mono seems to work correctly
        but renders badly; verticals faint, horizontals bold.

Andale Mono is sketchy in Emacs but other apps render it better and
a nice center dot makes numeric 0 distinct from upper case letter O.
Emacs has it in 13 point, other MacOS apps have it from 9 to 288
points where the Apple-Plus/Minus keys scale bigger/smaller.
If Emacs can scale this or any font, document how please!

The current default seems to be Monaco, easy on eyes but hands gotta
type Control-L often and slash makes numeric 0 look like numeric 8.
Got one with elliptical numeric 0 and boxy upper case letter O?

Out-of-the-box default Monaco font drops screen turds everywhere,
e.g., query-replace highlights leave ghost vertical bars
that touch the right edge of the character to the left.
Little three-dot colons appear in the wake of sharp sign (#)
which also loses two pixel columns at the left margin,
likewise (#) looks like (: #) after inserting a space.

<S-down-mouse-1> mouse-set-font gets a menu of
        Font Menu
        Misc     >
        Courier  >
        Fontset  >
where every choice but the default signals "Font not found"
and I get very bizarre results from M-x set-frame-font
with redisplay using vt100 font but typing or cursor
motion forward using a narrower font width, e.g.,
cursor appears to the left of the word it's on.
Lines lose some of their rightmost text so
in this paragraph the lines ending
... "Font not fou<--the "u" is cut in half
... -frame-f<--the line appears to end here

A font change leaves tons-o-turds between horizontal text lines.

                Peace
                        --Devon

PS: bug test code follows, for best results
        $ mv .emacs .emacs-NOT
        $ Open -a Emacs.app
        $ mv .emacs-NOT .emacs
as I know no way to give switches to a MacOS Carbon app.

;; MacOS font bug demo: stray dots inside a square bracket
(progn
  (insert "\n[ ] <--no screen turds\n[#] <--screen turds look like [: ] but  
will fix it.                ")
  (sit-for 0)
  (beginning-of-line)
  (forward-char)
  (delete-char 1)
  (insert " ")
  (forward-char))



;; MacOS vt100 font bug demo:  identical lines fail to line up.
;; Typing during the time delay loses differently.
(progn
  (defvar font (frame-parameter nil 'font))
  (defun revert-font () (interactive) (set-frame-font font t))
  (set-frame-font "-apple-vt100-medium-r-normal--0-0-75-75-m-0-mac-roman" t)
  (insert "\n123456789 <--looks good                \n123456789                
")
  (beginning-of-line)
  (while (not (looking-at " "))
    (sit-for 1)
    (forward-char))
  (insert " <--messed up but  will fix it."))



;; MacOS font change bug demo:

(set-frame-font "-apple-andale mono-medium-r-normal--0-0-75-75-m-0-mac-roman" 
nil)



(frame-parameter nil 'font)
        "-apple-monaco-medium-r-normal--12-120-75-75-m-120-mac-roman"
(length (x-list-fonts "*" nil (selected-frame)))
        1189
(shell-command "uname -a" t)
        ... Darwin Kernel Version 6.8: Wed Sep 10 15:20:55 PDT 2003; 
root:xnu/xnu-344.49.obj~2/RELEASE_PPC  Power Macintosh powerpc

In GNU Emacs 21.3.50.1 (powerpc-apple-darwin6.8)
 of 2005-05-14 on Christopher-McCulloughs-Computer.local.
configured using `configure '--enable-carbon-app' 'CC=gcc''

Important settings:
  value of $LC_ALL: nil
  value of $LC_COLLATE: nil
  value of $LC_CTYPE: nil
  value of $LC_MESSAGES: nil
  value of $LC_MONETARY: nil
  value of $LC_NUMERIC: nil
  value of $LC_TIME: nil
  value of $LANG: en_US
  locale-coding-system: iso-latin-1
  default-enable-multibyte-characters: t

Major mode: Lisp Interaction

Minor modes in effect:
  tool-bar-mode: t
  mouse-wheel-mode: t
  menu-bar-mode: t
  unify-8859-on-encoding-mode: t
  utf-translate-cjk-mode: t
  line-number-mode: t

Recent input:
<escape> x r e p o r <tab> <return>

Recent messages:
Loading mwheel...done
(/Users/devon/gnu/emacs/mac/Emacs.app/Contents/MacOS/Emacs)
Loading disp-table...done
Loading tool-bar...done
Loading image...done
Loading tooltip...done
Loading emacsbug...done