aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAndrew Choi2001-05-15 11:08:46 +0000
committerAndrew Choi2001-05-15 11:08:46 +0000
commitfa0b4c1479daea88a5ef302c13d7acd7c6dcc670 (patch)
tree87487042e4c1912efa825187dea9dc845fc7bb59
parente335b66af5bd7f1baf8cbf862c507f03255e3b23 (diff)
downloademacs-fa0b4c1479daea88a5ef302c13d7acd7c6dcc670.tar.gz
emacs-fa0b4c1479daea88a5ef302c13d7acd7c6dcc670.zip
* 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.
-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 @@
12001-05-15 Andrew Choi <akochoi@i-cable.com>
2
3 * src/Emacs.r: Change About box message.
4
5 * makefile.MPW: Add md5.c.x to EmacsObjects.
6
7 * src/mac.c (select): Call WaitNextEvent instead of Delay.
8 (pause): Ditto.
9 (sleep): Ditto.
10
11 * src/macterm.c (do_app_resume): Set cursor to arrow.
12 (clear_mouse_face): check for NIL Lisp object instead of null
13 pointer.
14
15 * INSTALL: Delete note on compiling Lisp files on a Unix system.
16 Add note on turning off end of line conversion.
17
12001-02-27 Andrew Choi <akochoi@i-cable.com> 182001-02-27 Andrew Choi <akochoi@i-cable.com>
2 19
3 * src/macfns.c: Rename everything containing *busy_cursor* and 20 * 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
41 41
42 ftp://mac-emacs.sourceforge.net/pub/mac-emacs/GNU-fonts.smi.bin 42 ftp://mac-emacs.sourceforge.net/pub/mac-emacs/GNU-fonts.smi.bin
43 43
44### IMPORTANT ### If you use StuffIf Expander to decompress and untar
45the distribution, you *must* set the radio button in the
46Preferences->Cross Platform->Convert text files to Macintosh format to
47"Never". Otherwise the compiled Lisp files will be corrupted.
48
44* BUILDING EMACS 49* BUILDING EMACS
45 50
46To build Emacs in the MPW Shell, simply set the directory to 51To 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
72comment in makefile.MPW to enable the -opt speed or -sym on option 77comment in makefile.MPW to enable the -opt speed or -sym on option
73(see note below). 78(see note below).
74 79
75The Mac version requires compiled Lisp files to be present in the lisp
76directory to run properly. It is cumbersome to bootstrap from only
77the Lisp source files. One way of getting the compiled Lisp files is
78to build Emacs once on, say, a Unix system and transfer that directory
79to the Mac. Note that linefeed conversion must be disabled when
80transferring compiled Lisp files.
81
82An alternative is to unzip and untar the archive lisp-elc.tgz. An
83older version of frame.elc in the archive may cause a problem when the
84Mac version starts up. If this is the case, simply remove or rename
85that file. Then once Emacs runs, you can invoke
86byte-recompile-directory on the lisp directory to byte-compile all
87out-of-date Lisp files.
88
89You may also need to run update-autoloads-from-directories on the lisp
90directory to bring loaddefs.el up-to-date.
91
92* NOTES 80* NOTES
93 81
94Emacs should build and run on a PowerMac running Mac OS 8.1 - 9.0. 82Emacs 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 = ¶
101 "{Src}lread.c.x" ¶ 101 "{Src}lread.c.x" ¶
102 "{Src}macros.c.x" ¶ 102 "{Src}macros.c.x" ¶
103 "{Src}marker.c.x" ¶ 103 "{Src}marker.c.x" ¶
104 "{Src}md5.c.x" ¶
104 "{Src}minibuf.c.x" ¶ 105 "{Src}minibuf.c.x" ¶
105 "{Src}mktime.c.x" ¶ 106 "{Src}mktime.c.x" ¶
106 "{Src}mocklisp.c.x" ¶ 107 "{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) {
139 {10, 60, 72, 278}, 139 {10, 60, 72, 278},
140 StaticText { 140 StaticText {
141 disabled, 141 disabled,
142 "GNU Emacs 21.0.99 for Mac OS\n" 142 "GNU Emacs 21 for Mac OS"
143 "(27 February 2001 release)\n"
144 "Report bugs to emacs-pretest-bug@gnu.org"
145 } 143 }
146 } 144 }
147}; 145};
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)
808{ 808{
809 EMACS_TIME end_time, now; 809 EMACS_TIME end_time, now;
810 EventRecord e; 810 EventRecord e;
811 unsigned long final_tick;
812 811
813 /* Can only handle wait for keyboard input. */ 812 /* Can only handle wait for keyboard input. */
814 if (n > 1 || wfds || efds) 813 if (n > 1 || wfds || efds)
@@ -840,7 +839,7 @@ select(n, rfds, wfds, efds, timeout)
840 } 839 }
841 } 840 }
842 841
843 Delay (1UL, &final_tick); 842 WaitNextEvent (0, &e, 1UL, NULL); /* Accept no event; wait 1 tic. by T.I.*/
844 843
845 EMACS_GET_TIME (now); 844 EMACS_GET_TIME (now);
846 EMACS_SUB_TIME (now, end_time, now); 845 EMACS_SUB_TIME (now, end_time, now);
@@ -856,13 +855,14 @@ select(n, rfds, wfds, efds, timeout)
856int 855int
857pause () 856pause ()
858{ 857{
859 unsigned long final_tick; 858 EventRecord e;
859 unsigned long tick;
860 860
861 if (!target_ticks) /* no alarm pending */ 861 if (!target_ticks) /* no alarm pending */
862 return -1; 862 return -1;
863 863
864 while (TickCount () <= target_ticks) 864 if ( (tick = TickCount ()) < target_ticks )
865 Delay (1UL, &final_tick); /* wait 1/60 second before retrying */ 865 WaitNextEvent (0, &e, target_ticks - tick, NULL); /* Accept no event; just wait. by T.I.*/
866 866
867 target_ticks = 0; 867 target_ticks = 0;
868 if (alarm_signal_func) 868 if (alarm_signal_func)
@@ -964,9 +964,10 @@ gettimeofday (tp)
964unsigned int 964unsigned int
965sleep (unsigned int seconds) 965sleep (unsigned int seconds)
966{ 966{
967 unsigned long final_tick; 967 EventRecord e;
968
969 WaitNextEvent (0, &e, seconds * 60UL, NULL); /* Accept no event; just wait. by T.I.*/
968 970
969 Delay (seconds * 60UL, &final_tick);
970 return (0); 971 return (0);
971} 972}
972#endif /* __MRC__ */ 973#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
7532clear_mouse_face (dpyinfo) 7532clear_mouse_face (dpyinfo)
7533 struct mac_display_info *dpyinfo; 7533 struct mac_display_info *dpyinfo;
7534{ 7534{
7535 if (tip_frame) 7535 if (!NILP (tip_frame))
7536 return; 7536 return;
7537 7537
7538 if (! NILP (dpyinfo->mouse_face_window)) 7538 if (! NILP (dpyinfo->mouse_face_window))
@@ -11260,6 +11260,8 @@ do_app_resume ()
11260 mac_output *mwp = (mac_output *) GetWRefCon (FrontWindow ()); 11260 mac_output *mwp = (mac_output *) GetWRefCon (FrontWindow ());
11261 struct frame *f = mwp->mFP; 11261 struct frame *f = mwp->mFP;
11262 11262
11263 SetCursor (&qd.arrow);
11264
11263 if (f) 11265 if (f)
11264 { 11266 {
11265 x_new_focus_frame (FRAME_MAC_DISPLAY_INFO (f), f); 11267 x_new_focus_frame (FRAME_MAC_DISPLAY_INFO (f), f);