(last_mouse_glyph_frame): New var.

(note_mouse_movement): Say mouse moved if current frame differs
from last_mouse_glyph_frame, and update last_mouse_glyph_frame.
(XTmouse_position): Set last_mouse_glyph_frame.
(XTread_socket): Clear last_mouse_glyph_frame on mouse up/down event.
(mac_draw_string_common) [MAC_OSX && WORDS_BIG_ENDIAN]: Fix typo.
Use EndianU16_BtoN.
(mac_draw_string_common) [MAC_OSX]: Don't use ATSUClearLayoutControls.
(x_per_char_metric, XLoadQueryFont)
[MAC_OS_X_VERSION_MAX_ALLOWED < 1020]: Use device origins to get
glyph bounds.
(mac_to_x_fontname, mac_do_list_fonts)
(mac_initialize_display_info): Change screen resolutions to 72dpi.

2 files changed, 56 insertions, 14 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index cbf49b50302..9bb33016bb4 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,25 @@
+2005-10-25  YAMAMOTO Mitsuharu  <mituharu@math.s.chiba-u.ac.jp>
+
+        * image.c [MAC_OS] (image_load_qt_1): Check image size.
+        Use GraphicsImportGetImageDescription instead of
+        GraphicsImportGetNaturalBounds.
+        [MAC_OSX] (image_load_quartz2d): Check image size.
+        [MAC_OS] (xpm_load_image): Likewise.
+
+        * macterm.c (last_mouse_glyph_frame): New var.
+        (note_mouse_movement): Say mouse moved if current frame differs
+        from last_mouse_glyph_frame, and update last_mouse_glyph_frame.
+        (XTmouse_position): Set last_mouse_glyph_frame.
+        (XTread_socket): Clear last_mouse_glyph_frame on mouse up/down event.
+        (mac_draw_string_common) [MAC_OSX && WORDS_BIG_ENDIAN]: Fix typo.
+        Use EndianU16_BtoN.
+        (mac_draw_string_common) [MAC_OSX]: Don't use ATSUClearLayoutControls.
+        (x_per_char_metric, XLoadQueryFont)
+        [MAC_OS_X_VERSION_MAX_ALLOWED < 1020]: Use device origins to get
+        glyph bounds.
+        (mac_to_x_fontname, mac_do_list_fonts)
+        (mac_initialize_display_info): Change screen resolutions to 72dpi.
+
 2005-10-25  Masatake YAMATO  <jet@gyve.org>
 
         * minibuf.c (Fdisplay_completion_list): Small doc fix.
diff --git a/src/macterm.c b/src/macterm.c
index 4b2b8c998ed..cc5625bd324 100644
--- a/src/macterm.c
+++ b/src/macterm.c
@@ -165,6 +165,7 @@ struct frame *pending_autoraise_frame;
 /* Where the mouse was last time we reported a mouse event.  */
 
 static Rect last_mouse_glyph;
+static FRAME_PTR last_mouse_glyph_frame;
 
 /* The scroll bar in which the last X motion event occurred.
 
@@ -716,10 +717,10 @@ mac_draw_string_common (f, gc, x, y, buf, nchars, mode, bytes_per_char)
 #ifndef WORDS_BIG_ENDIAN
       {
         int i;
-        Unichar *text = (Unichar *)buf;
+        UniChar *text = (UniChar *)buf;
 
         for (i = 0; i < nchars; i++)
-          text[i] = buf[2*i] << 8 | buf[2*i+1];
+          text[i] = EndianU16_BtoN (text[i]);
       }
 #endif
       err = atsu_get_text_layout_with_text_ptr ((ConstUniCharArrayPtr)buf,
@@ -773,11 +774,18 @@ mac_draw_string_common (f, gc, x, y, buf, nchars, mode, bytes_per_char)
                 ATSUDrawText (text_layout,
                               kATSUFromTextBeginning, kATSUToTextEnd,
                               Long2Fix (x), Long2Fix (port_height - y));
-              ATSUClearLayoutControls (text_layout,
-                                       sizeof (tags) / sizeof (tags[0]),
-                                       tags);
               CGContextSynchronize (context);
               QDEndCGContext (port, &context);
+#if 0
+              /* This doesn't work on Mac OS X 10.1.  */
+              ATSUClearLayoutControls (text_layout, 
+                                       sizeof (tags) / sizeof (tags[0]),
+                                       tags);
+#else
+              ATSUSetLayoutControls (text_layout,
+                                     sizeof (tags) / sizeof (tags[0]),
+                                     tags, sizes, values);
+#endif
             }
 #endif
         }
@@ -1666,8 +1674,12 @@ x_per_char_metric (font, char2b)
           if (err == noErr)
             err = ATSUGetGlyphBounds (text_layout, 0, 0,
                                       kATSUFromTextBeginning, kATSUToTextEnd,
-                                      kATSUseFractionalOrigins, 1,
-                                      &glyph_bounds, NULL);
+#if MAC_OS_X_VERSION_MAX_ALLOWED >= 1020
+                                      kATSUseFractionalOrigins,
+#else
+                                      kATSUseDeviceOrigins,
+#endif
+                                      1, &glyph_bounds, NULL);
           UNBLOCK_INPUT;
           if (err != noErr)
             pcm = NULL;
@@ -3910,13 +3922,15 @@ note_mouse_movement (frame, pos)
       return 1;
     }
   /* Has the mouse moved off the glyph it was on at the last sighting?  */
-  if (!PtInRect (*pos, &last_mouse_glyph))
+  if (frame != last_mouse_glyph_frame
+      || !PtInRect (*pos, &last_mouse_glyph))
     {
       frame->mouse_moved = 1;
       last_mouse_scroll_bar = Qnil;
       note_mouse_highlight (frame, pos->h, pos->v);
       /* Remember which glyph we're now on.  */
       remember_mouse_glyph (frame, pos->h, pos->v, &last_mouse_glyph);
+      last_mouse_glyph_frame = frame;
       return 1;
     }
 
@@ -4021,6 +4035,7 @@ XTmouse_position (fp, insist, bar_window, part, x, y, time)
           GetMouse (&mouse_pos);
           remember_mouse_glyph (f1, mouse_pos.h, mouse_pos.v,
                                 &last_mouse_glyph);
+          last_mouse_glyph_frame = f1;
 
           *bar_window = Qnil;
           *part = 0;
@@ -6572,7 +6587,7 @@ mac_to_x_fontname (name, size, style, charset)
 
   sprintf (xf, "%s-%c-normal--%d-%d-%d-%d-m-%d-%s",
            style & bold ? "bold" : "medium", style & italic ? 'i' : 'r',
-           size, size * 10, size ? 75 : 0, size ? 75 : 0, size * 10, charset);
+           size, size * 10, size ? 72 : 0, size ? 72 : 0, size * 10, charset);
 
   result = xmalloc (strlen (foundry) + strlen (family) + strlen (xf) + 3 + 1);
   sprintf (result, "-%s-%s-%s", foundry, family, xf);
@@ -7061,7 +7076,7 @@ mac_do_list_fonts (pattern, maxnames)
             continue;
           memcpy (scaled, font_name_table[i], former_len);
           sprintf (scaled + former_len,
-                   "-%d-%d-75-75-m-%d-%s",
+                   "-%d-%d-72-72-m-%d-%s",
                    scl_val[XLFD_SCL_PIXEL_SIZE],
                    scl_val[XLFD_SCL_POINT_SIZE],
                    scl_val[XLFD_SCL_AVGWIDTH],
@@ -7409,8 +7424,12 @@ XLoadQueryFont (Display *dpy, char *fontname)
           if (err == noErr)
             err = ATSUGetGlyphBounds (text_layout, 0, 0,
                                       kATSUFromTextBeginning, kATSUToTextEnd,
-                                      kATSUseFractionalOrigins, 1,
-                                      &glyph_bounds, NULL);
+#if MAC_OS_X_VERSION_MAX_ALLOWED >= 1020
+                                      kATSUseFractionalOrigins,
+#else
+                                      kATSUseDeviceOrigins,
+#endif
+                                      1, &glyph_bounds, NULL);
           if (err == noErr)
             {
               xassert (glyph_bounds.lowerRight.x - glyph_bounds.lowerLeft.x
@@ -9501,6 +9520,7 @@ XTread_socket (sd, expected, hold_quit)
                 != eventNotHandledErr)
               break;
 #endif
+            last_mouse_glyph_frame = 0;
 
             if (dpyinfo->grabbed && last_mouse_frame
                 && FRAME_LIVE_P (last_mouse_frame))
@@ -10230,8 +10250,8 @@ mac_initialize_display_info ()
   main_device_handle = LMGetMainDevice();
 
   dpyinfo->reference_count = 0;
-  dpyinfo->resx = 75.0;
-  dpyinfo->resy = 75.0;
+  dpyinfo->resx = 72.0;
+  dpyinfo->resy = 72.0;
   dpyinfo->color_p = TestDeviceAttribute (main_device_handle, gdDevType);
 #ifdef MAC_OSX
   /* HasDepth returns true if it is possible to have a 32 bit display,