diff options
| -rw-r--r-- | package.lisp | 7 | ||||
| -rw-r--r-- | reporter.lisp | 4 |
2 files changed, 3 insertions, 8 deletions
diff --git a/package.lisp b/package.lisp index 42bb6d9..f772683 100644 --- a/package.lisp +++ b/package.lisp @@ -26,7 +26,8 @@ (:import-from :phaser.unhtml #:text-excerpt) (:import-from :phaser.tracker #:track-statuses) (:export - #:reblog-top-statuses)) + #:reblog-top-statuses + #:summarize-and-post-top-statuses)) (defpackage #:phaser (:use @@ -35,9 +36,7 @@ #:phaser.toots #:phaser.tracker #:phaser.reporter) - (:shadowing-import-from #:phaser.reporter #:block) - (:export - #:summarize-and-post-top-statuses)) + (:shadowing-import-from #:phaser.reporter #:block)) (dolist (package '(#:phaser.reporter #:phaser.tracker)) (do-symbols (symbol package) diff --git a/reporter.lisp b/reporter.lisp index 2ebe6b9..93635e9 100644 --- a/reporter.lisp +++ b/reporter.lisp @@ -99,7 +99,3 @@ (defun summarize-and-post-top-statuses () (let ((summaries (summarize-top-statuses))) (post-toot (format nil "~{~a~%~%~}" summaries)))) - -(when nil - (summarize-top-statuses) - (summarize-and-post-top-statuses)) |