1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00

* src/Emacs.r: Change About box message.

* makefile.MPW: Add md5.c.x to EmacsObjects.

        * src/mac.c (select): Call WaitNextEvent instead of Delay.
        (pause): Ditto.
        (sleep): Ditto.

        * src/macterm.c (do_app_resume): Set cursor to arrow.
        (clear_mouse_face): check for NIL Lisp object instead of null
        pointer.

        * INSTALL: Delete note on compiling Lisp files on a Unix system.
        Add note on turning off end of line conversion.
This commit is contained in:
Andrew Choi 2001-05-15 11:08:46 +00:00
parent e335b66af5
commit fa0b4c1479
6 changed files with 35 additions and 28 deletions

View File

@ -1,3 +1,20 @@
2001-05-15 Andrew Choi <akochoi@i-cable.com>
* src/Emacs.r: Change About box message.
* makefile.MPW: Add md5.c.x to EmacsObjects.
* src/mac.c (select): Call WaitNextEvent instead of Delay.
(pause): Ditto.
(sleep): Ditto.
* src/macterm.c (do_app_resume): Set cursor to arrow.
(clear_mouse_face): check for NIL Lisp object instead of null
pointer.
* INSTALL: Delete note on compiling Lisp files on a Unix system.
Add note on turning off end of line conversion.
2001-02-27 Andrew Choi <akochoi@i-cable.com>
* src/macfns.c: Rename everything containing *busy_cursor* and

View File

@ -41,6 +41,11 @@ distribution converted to NFNT format can be obtained from
ftp://mac-emacs.sourceforge.net/pub/mac-emacs/GNU-fonts.smi.bin
### IMPORTANT ### If you use StuffIf Expander to decompress and untar
the distribution, you *must* set the radio button in the
Preferences->Cross Platform->Convert text files to Macintosh format to
"Never". Otherwise the compiled Lisp files will be corrupted.
* BUILDING EMACS
To build Emacs in the MPW Shell, simply set the directory to
@ -72,23 +77,6 @@ To build optimized or debugging version of Emacs in MPW, follow the
comment in makefile.MPW to enable the -opt speed or -sym on option
(see note below).
The Mac version requires compiled Lisp files to be present in the lisp
directory to run properly. It is cumbersome to bootstrap from only
the Lisp source files. One way of getting the compiled Lisp files is
to build Emacs once on, say, a Unix system and transfer that directory
to the Mac. Note that linefeed conversion must be disabled when
transferring compiled Lisp files.
An alternative is to unzip and untar the archive lisp-elc.tgz. An
older version of frame.elc in the archive may cause a problem when the
Mac version starts up. If this is the case, simply remove or rename
that file. Then once Emacs runs, you can invoke
byte-recompile-directory on the lisp directory to byte-compile all
out-of-date Lisp files.
You may also need to run update-autoloads-from-directories on the lisp
directory to bring loaddefs.el up-to-date.
* NOTES
Emacs should build and run on a PowerMac running Mac OS 8.1 - 9.0.

View File

@ -101,6 +101,7 @@ EmacsObjects =
"{Src}lread.c.x" ¶
"{Src}macros.c.x" ¶
"{Src}marker.c.x" ¶
"{Src}md5.c.x" カ
"{Src}minibuf.c.x" ¶
"{Src}mktime.c.x" ¶
"{Src}mocklisp.c.x" ¶

View File

@ -139,9 +139,7 @@ resource 'DITL' (128, purgeable) {
{10, 60, 72, 278},
StaticText {
disabled,
"GNU Emacs 21.0.99 for Mac OS\n"
"(27 February 2001 release)\n"
"Report bugs to emacs-pretest-bug@gnu.org"
"GNU Emacs 21 for Mac OS"
}
}
};

View File

@ -808,7 +808,6 @@ select(n, rfds, wfds, efds, timeout)
{
EMACS_TIME end_time, now;
EventRecord e;
unsigned long final_tick;
/* Can only handle wait for keyboard input. */
if (n > 1 || wfds || efds)
@ -840,7 +839,7 @@ select(n, rfds, wfds, efds, timeout)
}
}
Delay (1UL, &final_tick);
WaitNextEvent (0, &e, 1UL, NULL); /* Accept no event; wait 1 tic. by T.I.*/
EMACS_GET_TIME (now);
EMACS_SUB_TIME (now, end_time, now);
@ -856,13 +855,14 @@ select(n, rfds, wfds, efds, timeout)
int
pause ()
{
unsigned long final_tick;
EventRecord e;
unsigned long tick;
if (!target_ticks) /* no alarm pending */
return -1;
while (TickCount () <= target_ticks)
Delay (1UL, &final_tick); /* wait 1/60 second before retrying */
if ( (tick = TickCount ()) < target_ticks )
WaitNextEvent (0, &e, target_ticks - tick, NULL); /* Accept no event; just wait. by T.I.*/
target_ticks = 0;
if (alarm_signal_func)
@ -964,9 +964,10 @@ gettimeofday (tp)
unsigned int
sleep (unsigned int seconds)
{
unsigned long final_tick;
EventRecord e;
WaitNextEvent (0, &e, seconds * 60UL, NULL); /* Accept no event; just wait. by T.I.*/
Delay (seconds * 60UL, &final_tick);
return (0);
}
#endif /* __MRC__ */

View File

@ -7532,7 +7532,7 @@ void
clear_mouse_face (dpyinfo)
struct mac_display_info *dpyinfo;
{
if (tip_frame)
if (!NILP (tip_frame))
return;
if (! NILP (dpyinfo->mouse_face_window))
@ -11260,6 +11260,8 @@ do_app_resume ()
mac_output *mwp = (mac_output *) GetWRefCon (FrontWindow ());
struct frame *f = mwp->mFP;
SetCursor (&qd.arrow);
if (f)
{
x_new_focus_frame (FRAME_MAC_DISPLAY_INFO (f), f);