X-Git-Url: https://git.distorted.org.uk/~mdw/clg/blobdiff_plain/8f205b087459a43db37d7c6fa5992303aaa598d3..5d055f65bd6af390ea5d0e3e95e4f3d6577d7759:/gtk/gtkobject.lisp diff --git a/gtk/gtkobject.lisp b/gtk/gtkobject.lisp index 1869e9a..93b8504 100644 --- a/gtk/gtkobject.lisp +++ b/gtk/gtkobject.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. -;; $Id: gtkobject.lisp,v 1.38 2006-08-31 09:08:23 espen Exp $ +;; $Id: gtkobject.lisp,v 1.39 2006-09-05 13:23:40 espen Exp $ (in-package "GTK") @@ -233,7 +233,7 @@ (:metaclass container-child-class) (:container ,class)))))) -(defun container-class-child-class (container-class) +(defun container-child-class (container-class) (gethash container-class *container-to-child-class-mappings*)) (register-derivable-type 'container "GtkContainer" 'expand-container-type 'gobject-dependencies)