chiark / gitweb /
Infra: Rudimentary setup system.
[clg] / gtk / gtkobject.lisp
index 2a4962926eedd049d8514df82da8987db32dee2b..d9bae51236a135128699b371493a83dab389a8aa 100644 (file)
@@ -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.48 2008-10-09 18:20:52 espen Exp $
+;; $Id: gtkobject.lisp,v 1.49 2008-10-09 18:45:01 espen Exp $
 
 
 (in-package "GTK")
@@ -260,9 +260,6 @@ (defun expand-container-type (type forward-p options)
                 (:metaclass container-child-class)
                 (:container ,class))))))))
 
-(defun container-child-class (container-class)
-  (gethash container-class *container-to-child-class-mappings*))
-
 (defun container-dependencies (type options)
   (delete-duplicates 
    (append