Mercurial > hg > xemacs-beta

view lisp/gtk-package.el @ 4465:732b87cfabf2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Document Win32 symlink behaviour; adjust tests to take it into a/c. src/ChangeLog addition: 2008-05-21 Aidan Kehoe <kehoea@parhasard.net> * fileio.c (Fmake_symbolic_link): Document behaviour when the underlying OS doesn't support symbolic links. tests/ChangeLog addition: 2008-05-21 Aidan Kehoe <kehoea@parhasard.net> * automated/mule-tests.el (featurep): Make sure that working symlinks are available before testing their functionality. Also, don't bomb out on deleting the other temporary files if deleting the first threw an error.
author Aidan Kehoe <kehoea@parhasard.net>
date Wed, 21 May 2008 16:55:14 +0200
parents 7039e6323819
children db7068430402
line wrap: on
line source

;; A GTK version of package-ui.el

(globally-declare-fboundp
 '(gtk-window-new
   gtk-hbox-new gtk-container-add gtk-widget-show-all))

(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)))