From 03b1cb9a0bb3024344574bd885fc2d9a63d59e5a Mon Sep 17 00:00:00 2001 From: PuercoPop Date: Thu, 8 May 2014 04:48:14 -0500 Subject: [PATCH] Use *tweet-format-fn* in render-tweet --- plugins/twitter.lisp | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) diff --git a/plugins/twitter.lisp b/plugins/twitter.lisp index 8eae679..395e535 100644 --- a/plugins/twitter.lisp +++ b/plugins/twitter.lisp @@ -105,7 +105,4 @@ the spaxe needed for a space and the url." (defun render-tweet (post) "Sans the url, which is a must." - (apply #'format `(nil ,(car *tweet-format*) - ,@(loop - :for accesor in (cdr *tweet-format*) - :collect (funcall accesor post))))) + (funcall *tweet-format-fn* post))