Revision: 3919 Author: hans URL: http://bknr.net/trac/changeset/3919
remove ffffound redirection again, as it does not work because of the caching.
U trunk/projects/quickhoney/src/handlers.lisp
Modified: trunk/projects/quickhoney/src/handlers.lisp =================================================================== --- trunk/projects/quickhoney/src/handlers.lisp 2008-09-18 10:18:19 UTC (rev 3918) +++ trunk/projects/quickhoney/src/handlers.lisp 2008-09-18 10:25:17 UTC (rev 3919) @@ -23,14 +23,6 @@ (header-out :cache-control) "max-age=15")) (call-next-method))
-;;; redirect users coming from ffffound to the image page. -(defmethod handle-object :before ((handler imageproc-handler) (image quickhoney-image)) - (when (cl-ppcre:scan "^http://ffffound.com/image/" (hunchentoot:header-in* :referer)) - (redirect (format nil "/~(~A/~A~)/~A" - (quickhoney-image-category image) - (quickhoney-image-subcategory image) - (store-image-name image))))) - (defclass random-image-handler (object-handler) ())