[Emacs-diffs] Changes to emacs/src/xfns.c [emacs-unicode-2]

[Miles Bader]

Index: emacs/src/xfns.c
diff -c emacs/src/xfns.c:1.590.2.3 emacs/src/xfns.c:1.590.2.4
*** emacs/src/xfns.c:1.590.2.3  Fri Apr 16 12:51:03 2004
--- emacs/src/xfns.c    Mon Jun 28 07:29:25 2004
***************
*** 4425,4430 ****
--- 4425,4432 ----
    old_buffer = current_buffer;
    set_buffer_internal_1 (XBUFFER (buffer));
    current_buffer->truncate_lines = Qnil;
+   specbind (Qinhibit_read_only, Qt);
+   specbind (Qinhibit_modification_hooks, Qt);
    Ferase_buffer ();
    Finsert (1, &text);
    set_buffer_internal_1 (old_buffer);
***************
*** 5477,5482 ****
--- 5479,5489 ----
  #endif /* USE_X_TOOLKIT */
  
  #ifdef USE_GTK
+   /* Provide x-toolkit also for GTK.  Internally GTK does not use Xt so it
+      is not an X toolkit in that sense (USE_X_TOOLKIT is not defined).
+      But for a user it is a toolkit for X, and indeed, configure
+      accepts --with-x-toolkit=gtk.  */
+   Fprovide (intern ("x-toolkit"), Qnil);
    Fprovide (intern ("gtk"), Qnil);
  
    DEFVAR_LISP ("gtk-version-string", &Vgtk_version_string,