Author: hhubner Date: 2006-10-20 01:44:25 -0400 (Fri, 20 Oct 2006) New Revision: 2010
Modified: branches/xml-class-rework/projects/bos/worldpay-test/sponsor-handlers.lisp Log: Fix link to worldpay transaction
Modified: branches/xml-class-rework/projects/bos/worldpay-test/sponsor-handlers.lisp =================================================================== --- branches/xml-class-rework/projects/bos/worldpay-test/sponsor-handlers.lisp 2006-10-20 05:38:40 UTC (rev 2009) +++ branches/xml-class-rework/projects/bos/worldpay-test/sponsor-handlers.lisp 2006-10-20 05:44:25 UTC (rev 2010) @@ -136,8 +136,11 @@ (when (probe-file (contract-pdf-pathname contract)) (html :br (cmslink (contract-pdf-url contract) "Show Certificate"))) (when (contract-worldpay-trans-id contract) - (html :br ((:a :href (format nil "https://select.worldpay.com/wcc/admin?op-transInfo-~A=1" - (contract-worldpay-trans-id contract))))))))))) + (html :br ((:a :class "cmslink" + :target "_new" + :href (format nil "https://select.worldpay.com/wcc/admin?op-transInfo-~A=1" + (contract-worldpay-trans-id contract))) + "Show WorldPay transaction")))))))) (:p (submit-button "save" "save") (submit-button "delete" "delete" :confirm "Really delete this sponsor?"))))))