comparison tests/gtk/gtk-test.el @ 5228:5efbd1253905

Remove all support for InfoDock. src/ChangeLog addition: 2010-06-02 Aidan Kehoe <kehoea@parhasard.net> * lread.c (vars_of_lread): * emacs.c: (shut_down_emacs, vars_of_emacs, complex_vars_of_emacs): * device-x.c (get_device_from_display) (have_xemacs_resources_in_xrdb): * device-gtk.c (Fgtk_init): * config.h.in: Remove all checks for InfoDock. lisp/ChangeLog addition: 2010-06-02 Aidan Kehoe <kehoea@parhasard.net> * version.el: (emacs-version): * startup.el (command-line): * simple.el (display-warning, emacs-name): * packages.el (packages-package-hierarchy-directory-names): * loadup.el (Dumping): * dumped-lisp.el (preloaded-file-list): Remove all InfoDock-specific code.
author Aidan Kehoe <kehoea@parhasard.net>
date Mon, 07 Jun 2010 18:42:10 +0100
parents 0784d089fdc9
children 308d34e9f07d
comparison
equal deleted inserted replaced
5227:fbd1485af104 5228:5efbd1253905
1974 src-button (gtk-button-new-with-label "View source") 1974 src-button (gtk-button-new-with-label "View source")
1975 gc-button (gtk-button-new-with-label "Garbage Collect") 1975 gc-button (gtk-button-new-with-label "Garbage Collect")
1976 close-button (gtk-button-new-with-label "Quit")) 1976 close-button (gtk-button-new-with-label "Quit"))
1977 (gtk-window-set-title window 1977 (gtk-window-set-title window
1978 (format "%s/GTK %d.%d.%d" 1978 (format "%s/GTK %d.%d.%d"
1979 (if (featurep 'infodock) "InfoDock" "XEmacs") 1979 "XEmacs"
1980 emacs-major-version emacs-minor-version 1980 emacs-major-version emacs-minor-version
1981 (or emacs-patch-level emacs-beta-version))) 1981 (or emacs-patch-level emacs-beta-version)))
1982 1982
1983 (gtk-scrolled-window-set-policy scrolled 'automatic 'automatic) 1983 (gtk-scrolled-window-set-policy scrolled 'automatic 'automatic)
1984 (gtk-scrolled-window-add-with-viewport scrolled tree) 1984 (gtk-scrolled-window-add-with-viewport scrolled tree)