franco@alberta.UUCP (Franco Carlacci) (06/23/88)
I tried running that highlight function that was posted
earlier but GNUemacs tells me
that the symbol definition for update-display is void. Where is
this update-display? Running Version 18.47.4 .
Francoliberte@M.CS.UIUC.EDU (Daniel LaLiberte) (06/28/88)
I had sent out a bad diff for update-display along with my
highlight.el code. Here is a correct version of the diffs for 18.50
and probably 18.51.
Dan LaLiberte
uiucdcs!liberte
liberte@cs.uiuc.edu
liberte%a.cs.uiuc.edu@uiucvmd.bitnet
--------------------------
*** /tmp/,RCSt1a19051 Fri May 13 19:59:31 1988
--- sunfns.c Wed Apr 6 00:19:16 1988
***************
*** 27,32 ****
--- 27,36 ----
/*
* Emacs Lisp-Callable functions for sunwindows
*/
+ /* Local changes to support Leif.
+ * $Header: $
+ * $Log: $
+ */
#include "config.h"
#include <stdio.h>
***************
*** 182,187 ****
--- 186,192 ----
return(Qt);
}
+ /* Disable this update-display because one is included in xdisp.c
DEFUN ("update-display", Fupdate_display, Supdate_display, 0, 0, 0,
"Perform redisplay.")
()
***************
*** 189,194 ****
--- 194,200 ----
DoDsp(1);
return(Qt);
}
+ */
/*
***************
*** 492,498 ****
defsubr(&Ssun_window_init);
defsubr(&Ssit_for_millisecs);
defsubr(&Ssleep_for_millisecs);
! defsubr(&Supdate_display);
defsubr(&Ssun_change_cursor_icon);
defsubr(&Ssun_set_selection);
defsubr(&Ssun_get_selection);
--- 498,504 ----
defsubr(&Ssun_window_init);
defsubr(&Ssit_for_millisecs);
defsubr(&Ssleep_for_millisecs);
! /* defsubr(&Supdate_display); */
defsubr(&Ssun_change_cursor_icon);
defsubr(&Ssun_set_selection);
defsubr(&Ssun_get_selection);
*** /tmp/,RCSt1a19061 Fri May 13 19:59:54 1988
--- xdisp.c Thu Apr 7 22:28:21 1988
***************
*** 18,23 ****
--- 18,27 ----
file named COPYING. Among other things, the copyright notice
and this notice must be preserved on all copies. */
+ /* Local changes to support Leif.
+ * $Header: $
+ * $Log: $
+ */
#include "config.h"
#include <stdio.h>
***************
*** 254,259 ****
--- 258,280 ----
prev_minibuf_message = minibuf_message;
}
+ DEFUN ("update-display", Fupdate_display, Supdate_display, 0, 0, 0,
+ "Perform redisplay.")
+ ()
+ {
+ DoDsp_real(1, 1);
+ return(Qt);
+ }
+
+
+ /* Interface to DoDsp_real to add a force parameter */
+
+ DoDsp (SaveMiniBuf)
+ {
+ DoDsp_real (SaveMiniBuf, 0);
+ }
+
+
/* Do a screen update, taking possible shortcuts into account.
This is the main external entry point for redisplay.
***************
*** 270,276 ****
See Fcall_process; if you called it from here, it could be
entered recursively. */
! DoDsp (SaveMiniBuf)
{
register struct window *w = XWINDOW (selected_window);
register int pause;
--- 291,297 ----
See Fcall_process; if you called it from here, it could be
entered recursively. */
! DoDsp_real (SaveMiniBuf, force)
{
register struct window *w = XWINDOW (selected_window);
register int pause;
***************
*** 399,405 ****
if (interrupt_input)
unrequest_sigio ();
! pause = update_screen (0, inhibit_hairy_id);
/* If screen does not match, prevent doing single-line-update next time.
Also, don't forget to check every line to update the arrow. */
--- 420,426 ----
if (interrupt_input)
unrequest_sigio ();
! pause = update_screen (force, inhibit_hairy_id);
/* If screen does not match, prevent doing single-line-update next time.
Also, don't forget to check every line to update the arrow. */
***************
*** 1961,1966 ****
--- 1982,1988 ----
mode_line_inverse_video = 1;
defsubr (&Sredraw_display);
+ defsubr (&Supdate_display);
}
/* initialize the window system */