(setf (get 'changelog-oper-log 'type) 'entityfile)
(setf (get 'changelog-oper-log 'latest-rearchived) 'nil)
(setf (get 'changelog-oper-log 'in-categories) 'nil)
(setf (get 'changelog-oper-log 'latest-written) '"2009-12-06/00:17")
(setf (get 'changelog-oper-log 'contents)
      '(seq&
        (changelog-oper-log
         |(\|lognote:\| "2009-12-06" "00.17.36" changelog-oper logfil-for)|)))
(setf (get 'changelog-oper-log 'purpose) 'nil)
(setf (get 'changelog-oper-log 'author) 'nil)
(setf (get 'changelog-oper-log 'requires) 'nil)
(setf (get 'changelog-oper-log 'mustload) 'nil)
(setf (get 'changelog-oper-log 'leos-extension) 'nil)
(setf (get 'changelog-oper-log 'profile) 'nil)
(setf (get 'changelog-oper-log 'overlay-on) 'nil)
(setf (get 'changelog-oper-log 'overlay-types) 'nil)
(setf (get 'changelog-oper-log 'overlay-own) 'nil)
(setf (get 'changelog-oper-log 'leos-use) 'nil)
(setf (get 'changelog-oper-log 'dont-display) 'nil)
(setf (get 'changelog-oper-log 'sections) 'nil)
(setf (get 'changelog-oper-log 'local-ents) 'nil)
(setf (get 'changelog-oper-log 'changed-since-archived) 't)
(setf (get 'changelog-oper-log 'latest-archived-entity) 'nil)


(setf (get '|(\|lognote:\| "2009-12-06" "00.17.36" changelog-oper logfil-for)|
           'type)
      'lognote)
(setf (get '|(\|lognote:\| "2009-12-06" "00.17.36" changelog-oper logfil-for)|
           'latest-rearchived)
      'nil)
(setf (get '|(\|lognote:\| "2009-12-06" "00.17.36" changelog-oper logfil-for)|
           'in-categories)
      'nil)
(setf (get '|(\|lognote:\| "2009-12-06" "00.17.36" changelog-oper logfil-for)|
           'symbexpr)
      '(|lognote:| "2009-12-06" "00.17.36" changelog-oper logfil-for))


