From: espen Date: Thu, 9 Feb 2006 22:29:43 +0000 (+0000) Subject: Initarg :construct renamed to :construct-only X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/clg/commitdiff_plain/d42f5bdd3c5d4e0fd11dc806951fb9e3b6c0b50e Initarg :construct renamed to :construct-only --- diff --git a/glib/ginterface.lisp b/glib/ginterface.lisp index 00fe5fb..6f498c5 100644 --- a/glib/ginterface.lisp +++ b/glib/ginterface.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: ginterface.lisp,v 1.12 2005-04-23 16:48:50 espen Exp $ +;; $Id: ginterface.lisp,v 1.13 2006-02-09 22:29:43 espen Exp $ (in-package "GLIB") @@ -54,7 +54,7 @@ (defmethod compute-effective-slot-definition-initargs ((class ginterface-class) (most-specific-slot-value direct-slotds 'pname)) :readable (most-specific-slot-value direct-slotds 'readable) :writable (most-specific-slot-value direct-slotds 'writable) - :construct (most-specific-slot-value direct-slotds 'construct)) + :construct-only (most-specific-slot-value direct-slotds 'construct)) (call-next-method)) (call-next-method)))