Changeset 15329


Ignore:
Timestamp:
Apr 17, 2012, 9:01:01 AM (7 years ago)
Author:
gb
Message:

All instances of APPLICATION get a non-null UI-OBJECT, since INSPECT
now expects that.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/level-1/l1-application.lisp

    r15326 r15329  
    5656      :initform
    5757      (list *standard-help-argument* *standard-version-argument*))
    58      (ui-object :initform nil :initarg :ui-object :accessor application-ui-object)))
     58     (ui-object :initform (make-instance 'ui-object) :initarg :ui-object :accessor application-ui-object)))
    5959       
    6060(defclass ui-object ()
Note: See TracChangeset for help on using the changeset viewer.