summaryrefslogtreecommitdiff
path: root/mac
diff options
context:
space:
mode:
authorAndrew Choi <akochoi@shaw.ca>2001-05-15 11:08:46 +0000
committerAndrew Choi <akochoi@shaw.ca>2001-05-15 11:08:46 +0000
commitfa0b4c1479daea88a5ef302c13d7acd7c6dcc670 (patch)
tree87487042e4c1912efa825187dea9dc845fc7bb59 /mac
parente335b66af5bd7f1baf8cbf862c507f03255e3b23 (diff)
downloademacs-fa0b4c1479daea88a5ef302c13d7acd7c6dcc670.tar.gz
* 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.
Diffstat (limited to 'mac')
-rw-r--r--mac/ChangeLog17
-rw-r--r--mac/INSTALL22
-rw-r--r--mac/makefile.MPW1
-rw-r--r--mac/src/Emacs.r4
-rw-r--r--mac/src/mac.c15
-rw-r--r--mac/src/macterm.c4
6 files changed, 35 insertions, 28 deletions
diff --git a/mac/ChangeLog b/mac/ChangeLog
index 149f62838a3..1570a6cbea1 100644
--- a/mac/ChangeLog
+++ b/mac/ChangeLog
@@ -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
diff --git a/mac/INSTALL b/mac/INSTALL
index 3ea6ab6f392..dd620995077 100644
--- a/mac/INSTALL
+++ b/mac/INSTALL
@@ -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.
diff --git a/mac/makefile.MPW b/mac/makefile.MPW
index f460f5a1735..f339ed30481 100644
--- a/mac/makefile.MPW
+++ b/mac/makefile.MPW
@@ -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" ¶
diff --git a/mac/src/Emacs.r b/mac/src/Emacs.r
index 12ed6562744..475bce62f3c 100644
--- a/mac/src/Emacs.r
+++ b/mac/src/Emacs.r
@@ -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"
}
}
};
diff --git a/mac/src/mac.c b/mac/src/mac.c
index 08d2aa2d8bb..1e468a308d7 100644
--- a/mac/src/mac.c
+++ b/mac/src/mac.c
@@ -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__ */
diff --git a/mac/src/macterm.c b/mac/src/macterm.c
index a6f979ed7b4..3df7ae32ea5 100644
--- a/mac/src/macterm.c
+++ b/mac/src/macterm.c
@@ -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);