Fixed this bug, thanks for reporting ! среда, 11 июня 2014 г., 23:40:53 UTC+3 пользователь [email protected] написал: > > ;same as code in request-hooks.lisp except both "when" predicates are > inverted. > ;i.e. we always want "when" bodies to run else there is an error in > non-debug > ;mode saying that *parts-md5-context-hash* is unbound. > ;an alternative fix is to just patch the original removing the when > predicates. > ;the correct fix is neither. it is to disable the code causing the > "unbound var" > ;complaint when in prod mode. > (eval-when (:load-toplevel) > (pushnew > (lambda () > (when (not (or *weblocks-global-debug* > (webapp-debug))) > (weblocks-util:reset-html-parts-set))) > (request-hook :application :pre-render)) > > (pushnew > (lambda () > (declare (special weblocks-util:*parts-md5-hash* > weblocks-util:*parts-md5-context-hash*)) > (when (not (or *weblocks-global-debug* > (webapp-debug))) > (progn > (weblocks-util:update-html-parts-connections) > (setf (webapp-session-value 'parts-md5-hash) > weblocks-util:*parts-md5-hash*) > (setf (webapp-session-value 'parts-md5-context-hash) > weblocks-util:*parts-md5-context-hash*)))) > (request-hook :application :post-render))) >
-- You received this message because you are subscribed to the Google Groups "weblocks" group. To unsubscribe from this group and stop receiving emails from it, send an email to [email protected]. To post to this group, send email to [email protected]. Visit this group at http://groups.google.com/group/weblocks. For more options, visit https://groups.google.com/d/optout.
