This commit was manufactured by cvs2svn to create branch 'chise-r21-4-18'.

[chise/xemacs-chise.git-] / lisp / gtk-package.el

diff --git a/lisp/gtk-package.el b/lisp/gtk-package.el
new file mode 100644 (file)
index 0000000..1da2db9
--- /dev/null
+++ b/lisp/gtk-package.el
@@ -0,0 +1,10 @@
+;; A GTK version of package-ui.el
+
+(require 'package-get)
+(require 'package-ui)
+
+(defun package-gtk-edit-sites ()
+  (let ((window (gtk-window-new 'toplevel))
+       (box (gtk-hbox-new nil 5)))
+    (gtk-container-add window box)
+    (gtk-widget-show-all window)))