feat(v0.3.0): Event Orchestrator skill

- New system-event-orchestrator skill with hook registry, cron registry, and tier classifier

- Three dispatch tiers: :reflex (no LLM), :cognition (light), :reasoning (full)

- Org-mode timestamp parsing for repeat patterns (+1w, +1d, +1m)

- Registers on heartbeat via defskill, dispatches due cron jobs

- Fix all remaining harness-log → log-message references across org files

lisp/core-loop-reason.lisp

@@ -19,7 +19,7 @@
     (or (dolist (backend backends)
           (let ((backend-fn (gethash backend *backend-registry*)))
             (when backend-fn
-              (harness-log "PROBABILISTIC: Attempting backend ~a..." backend)
+              (log-message "PROBABILISTIC: Attempting backend ~a..." backend)
               (let* ((model (when *model-selector*
                               (funcall *model-selector* backend context)))
                      (result (if model
@@ -30,7 +30,7 @@
                       ((stringp result)
                        (return result))
                       (t
-                       (harness-log "PROBABILISTIC: Backend ~a failed: ~a"
+                       (log-message "PROBABILISTIC: Backend ~a failed: ~a"
                                    backend (getf result :message))))))))
         (list :type :LOG
               :payload (list :text "Neural Cascade Failure: All providers exhausted.")))))
@@ -107,7 +107,7 @@
           (let ((next-action (funcall gate current-action context)))
             (when (and (listp next-action)
                        (member (proto-get next-action :type) '(:LOG :EVENT)))
-              (harness-log "DETERMINISTIC: Intercepted by skill '~a'" (skill-name skill))
+              (log-message "DETERMINISTIC: Intercepted by skill '~a'" (skill-name skill))
               (return-from cognitive-verify next-action))
              (when next-action (setf current-action next-action))))))
     current-action))