xemacs-beta: lisp/gtk-package.el annotate

annotate lisp/gtk-package.el @ 1559:9bf5135fc04f

[xemacs-hg @ 2003-07-04 07:16:25 by michaels] 2003-07-02 Mike Sperber <mike@xemacs.org> * toolbar.c (update_frame_toolbars_geometry): Update the frame size when correct information to compute it is actually available. Moreover, do it right via the frame method if it's available.

author	michaels
date	Fri, 04 Jul 2003 07:16:26 +0000
parents	7039e6323819
children	db7068430402

rev	line source
462 0784d089fdc9 Import from CVS: tag r21-2-46 cvs parents: diff changeset	1 ;; A GTK version of package-ui.el
0784d089fdc9 Import from CVS: tag r21-2-46 cvs parents: diff changeset	2
502 7039e6323819 [xemacs-hg @ 2001-05-04 22:41:46 by ben] ben parents: 462 diff changeset	3 (globally-declare-fboundp
7039e6323819 [xemacs-hg @ 2001-05-04 22:41:46 by ben] ben parents: 462 diff changeset	4 '(gtk-window-new
7039e6323819 [xemacs-hg @ 2001-05-04 22:41:46 by ben] ben parents: 462 diff changeset	5 gtk-hbox-new gtk-container-add gtk-widget-show-all))
7039e6323819 [xemacs-hg @ 2001-05-04 22:41:46 by ben] ben parents: 462 diff changeset	6
462 0784d089fdc9 Import from CVS: tag r21-2-46 cvs parents: diff changeset	7 (require 'package-get)
0784d089fdc9 Import from CVS: tag r21-2-46 cvs parents: diff changeset	8 (require 'package-ui)
0784d089fdc9 Import from CVS: tag r21-2-46 cvs parents: diff changeset	9
0784d089fdc9 Import from CVS: tag r21-2-46 cvs parents: diff changeset	10 (defun package-gtk-edit-sites ()
0784d089fdc9 Import from CVS: tag r21-2-46 cvs parents: diff changeset	11 (let ((window (gtk-window-new 'toplevel))
0784d089fdc9 Import from CVS: tag r21-2-46 cvs parents: diff changeset	12 (box (gtk-hbox-new nil 5)))
0784d089fdc9 Import from CVS: tag r21-2-46 cvs parents: diff changeset	13 (gtk-container-add window box)
0784d089fdc9 Import from CVS: tag r21-2-46 cvs parents: diff changeset	14 (gtk-widget-show-all window)))

Mercurial > hg > xemacs-beta

annotate lisp/gtk-package.el @ 1559:9bf5135fc04f