~mdw
/
clg
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Bug fix
[clg]
/
gtk
/
gtk.lisp
diff --git
a/gtk/gtk.lisp
b/gtk/gtk.lisp
index
7b74527
..
0b1ed6e
100644
(file)
--- a/
gtk/gtk.lisp
+++ b/
gtk/gtk.lisp
@@
-20,7
+20,7
@@
;; TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
;; SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
;; TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
;; SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
-;; $Id: gtk.lisp,v 1.5
7 2006/02/26 23:38:03
espen Exp $
+;; $Id: gtk.lisp,v 1.5
9 2006/02/28 16:29:45
espen Exp $
(in-package "GTK")
(in-package "GTK")
@@
-45,7
+45,7
@@
(format nil "Gtk+ v~A.~A.~A" major minor micro))))
(defun clg-version ()
(format nil "Gtk+ v~A.~A.~A" major minor micro))))
(defun clg-version ()
- "clg 0.9
1 version
")
+ "clg 0.9
2
")
;;;; Initalization
;;;; Initalization
@@
-73,6
+73,14
@@
(setq *max-event-to-sec* 0)
(setq *max-event-to-usec* 1000))))
(setq *max-event-to-sec* 0)
(setq *max-event-to-usec* 1000))))
+;;; Generic functions
+
+(defgeneric add-to-radio-group (item1 item2))
+(defgeneric activate-radio-widget (item))
+(defgeneric (setf tool-item-tip-text) (tip-text tool-item))
+(defgeneric (setf tool-item-tip-private) (tip-private tool-item))
+
+
;;; Misc
;;; Misc