Revision: 4613 Author: manuel URL: http://bknr.net/trac/changeset/4613
updated cl-paypal U trunk/thirdparty/cl-paypal/.git/index U trunk/thirdparty/cl-paypal/.git/logs/HEAD U trunk/thirdparty/cl-paypal/.git/logs/refs/heads/develop U trunk/thirdparty/cl-paypal/.git/logs/refs/remotes/writable/develop A trunk/thirdparty/cl-paypal/.git/objects/13/ A trunk/thirdparty/cl-paypal/.git/objects/13/0c568d3db006611c3f633f04b6b51ef959b290 A trunk/thirdparty/cl-paypal/.git/objects/3a/ A trunk/thirdparty/cl-paypal/.git/objects/3a/d4612e40058844afafc7c28b6d86e9e4745c8f A trunk/thirdparty/cl-paypal/.git/objects/b2/ A trunk/thirdparty/cl-paypal/.git/objects/b2/c22f4f042e5f95dc9d3ff9c4da5e36c966c988 U trunk/thirdparty/cl-paypal/.git/refs/heads/develop U trunk/thirdparty/cl-paypal/.git/refs/remotes/writable/develop U trunk/thirdparty/cl-paypal/cl-paypal.lisp
Modified: trunk/thirdparty/cl-paypal/.git/index =================================================================== (Binary files differ)
Modified: trunk/thirdparty/cl-paypal/.git/logs/HEAD =================================================================== --- trunk/thirdparty/cl-paypal/.git/logs/HEAD 2010-09-16 20:03:53 UTC (rev 4612) +++ trunk/thirdparty/cl-paypal/.git/logs/HEAD 2010-09-17 14:31:09 UTC (rev 4613) @@ -6,3 +6,4 @@ 09d8a07cd56070f899e46edf79e714981f527ce2 f01f64981f2de889caf5127e8f21166c4c1ef164 Manuel Odendahl wesen@ruinwesen.com 1284654667 +0200 commit: Added helper functions to handle running transactions f01f64981f2de889caf5127e8f21166c4c1ef164 7f1d6daa2bddd891225cca488fd1aff6737681cf Manuel Odendahl wesen@ruinwesen.com 1284667389 +0200 commit: Adapt to VERSION 63.0 7f1d6daa2bddd891225cca488fd1aff6737681cf 6bddc89a7a42e3a67a9bb915f89d3225c588a381 Manuel Odendahl wesen@ruinwesen.com 1284667395 +0200 commit: Run test server on localhost +6bddc89a7a42e3a67a9bb915f89d3225c588a381 130c568d3db006611c3f633f04b6b51ef959b290 Manuel Odendahl wesen@ruinwesen.com 1284729628 +0200 commit: Parse answer of 63.0 requests
Modified: trunk/thirdparty/cl-paypal/.git/logs/refs/heads/develop =================================================================== --- trunk/thirdparty/cl-paypal/.git/logs/refs/heads/develop 2010-09-16 20:03:53 UTC (rev 4612) +++ trunk/thirdparty/cl-paypal/.git/logs/refs/heads/develop 2010-09-17 14:31:09 UTC (rev 4613) @@ -5,3 +5,4 @@ 09d8a07cd56070f899e46edf79e714981f527ce2 f01f64981f2de889caf5127e8f21166c4c1ef164 Manuel Odendahl wesen@ruinwesen.com 1284654667 +0200 commit: Added helper functions to handle running transactions f01f64981f2de889caf5127e8f21166c4c1ef164 7f1d6daa2bddd891225cca488fd1aff6737681cf Manuel Odendahl wesen@ruinwesen.com 1284667389 +0200 commit: Adapt to VERSION 63.0 7f1d6daa2bddd891225cca488fd1aff6737681cf 6bddc89a7a42e3a67a9bb915f89d3225c588a381 Manuel Odendahl wesen@ruinwesen.com 1284667395 +0200 commit: Run test server on localhost +6bddc89a7a42e3a67a9bb915f89d3225c588a381 130c568d3db006611c3f633f04b6b51ef959b290 Manuel Odendahl wesen@ruinwesen.com 1284729628 +0200 commit: Parse answer of 63.0 requests
Modified: trunk/thirdparty/cl-paypal/.git/logs/refs/remotes/writable/develop =================================================================== --- trunk/thirdparty/cl-paypal/.git/logs/refs/remotes/writable/develop 2010-09-16 20:03:53 UTC (rev 4612) +++ trunk/thirdparty/cl-paypal/.git/logs/refs/remotes/writable/develop 2010-09-17 14:31:09 UTC (rev 4613) @@ -3,3 +3,4 @@ 98fc0087b8ef92c9fc00f76c53e72622b7724b5e 09d8a07cd56070f899e46edf79e714981f527ce2 Manuel Odendahl wesen@ruinwesen.com 1284540047 +0200 update by push 09d8a07cd56070f899e46edf79e714981f527ce2 f01f64981f2de889caf5127e8f21166c4c1ef164 Manuel Odendahl wesen@ruinwesen.com 1284654694 +0200 update by push f01f64981f2de889caf5127e8f21166c4c1ef164 6bddc89a7a42e3a67a9bb915f89d3225c588a381 Manuel Odendahl wesen@ruinwesen.com 1284667406 +0200 update by push +6bddc89a7a42e3a67a9bb915f89d3225c588a381 130c568d3db006611c3f633f04b6b51ef959b290 Manuel Odendahl wesen@ruinwesen.com 1284729642 +0200 update by push
Added: trunk/thirdparty/cl-paypal/.git/objects/13/0c568d3db006611c3f633f04b6b51ef959b290 =================================================================== (Binary files differ)
Property changes on: trunk/thirdparty/cl-paypal/.git/objects/13/0c568d3db006611c3f633f04b6b51ef959b290 ___________________________________________________________________ Added: svn:mime-type + application/octet-stream
Added: trunk/thirdparty/cl-paypal/.git/objects/3a/d4612e40058844afafc7c28b6d86e9e4745c8f =================================================================== --- trunk/thirdparty/cl-paypal/.git/objects/3a/d4612e40058844afafc7c28b6d86e9e4745c8f (rev 0) +++ trunk/thirdparty/cl-paypal/.git/objects/3a/d4612e40058844afafc7c28b6d86e9e4745c8f 2010-09-17 14:31:09 UTC (rev 4613) @@ -0,0 +1,20 @@ +xíZ[oÜÆî«ô+L#sUSÝÔh6p!R\Jv¢hYrVKK²äÐ^ôÛû3¹Üµl÷Ñ ÛËËËËwÎõ¢šâûçß=ýCI-Óky¥Ä<-p}WËb¶¿ gj*I«2Ëu^ÂŒJTÓTùk¶/D<\ÝšÿvªÕnyHŒj¥u|4æUºkÅ</s-+17ª«²UI«ŒÄ +¿tôf¶m Þnyc^Ë4Um ÃxÖLœ ÂyùAyÃ7rŽjï 'ö5oT]5ZÄ /2)âÞGØ©kæ ØO(,kXA' *¯ôêP<;fnnÇ˪YK- ]Xíçâþ2 + :ÚCn±¥ndÙÊ)Ìî(Žy³V g,sÏ{uéJ©ŽÊToQo}Zò[!mz?Ð^àüÇâf§+·âÝůBÄ+²ÌIJ*ê<ŒÕæ +EKÓª=âBé®)[¡W +ŒZ!ñGÔDrSW²]x-¯UB¥ â2©e gËU©;ø¹W§·`ªEtù-x?!'±. BÐ0YäÐ>ö:¹0G<uj¶ÉñEͬy¯!âÙl/n^öÛ²,ö÷LTôJ5êJÝÂôu!S%¢óþvöúíÅÙßß]Ÿ}ü>Úà!¢z¡W¯y³»ÝxÝ:¯ ðÞaÈp84TÓ,Ê2ÑÝn+¢ÿüú>>:üiÿë8ùþßýqsCaRÅùR0{x>üP "ÕŒOðÂKËF-{eÄñL̯ÕÝMÕdÞœ!'\4S·ì``ñ¹:=u5¢}ÝšyÕµÆ*"ŸRã³×n~oÏe>"¯}b³GàÊh bkYâ-÷÷ßF`³×û+ÁX©UWŠ+ÄeUéy×ÉrËvÞéeòW£ L ¿°Z ÊŽa챺*í +n9·môc¢ÉÜ&ô ÌÙœ}i=Ø{š®Ž€9bwLevdY;Sm +ÁªÂžPlX ÁVwÁŠ3|Ô4€Œ¬kP;É ÕÃÌæD~Ü{lÇ +aCÈ`ÍG2]òmÊ¥à èãçd³à¢ªjF¡X(ªT'ûñšÕozHQmTª`ó¡\bgÓvW(¶/B}A"W8µ@ïÓ"8TÈ +4 IçÂx®ªêšV^W¬ä9·zâõïçâäü*ÝogoÿöæJ$íÁ +ÑÔìZõXÈÌ4² å ¹Hv·Fò¢6T ÛjjÛ°baàadžjÊ5s¶]è:Ø·uäï¬×ki:>·«CÛÉ:O$œuÉSÃÏÜnn^WÞ¹ÐrØ&ZjºP8Í"k°F %Œ~?»ž|õæu$¢ç>:ŸÙ»Ë³H8£ÀÍá1<ÿÇiÏ\Mð </_œ|}òöÝÅYϹͯJ4ök*c*÷ɺÇ>5M56e&0ÈpÆ,îÄ7Ò,kv¹×\¿ÅíÝzQIþÝDþ'+»!Øt®µÕü3ôÜ`kXý_8¡ÎåeÚ7QVKtÀe ÷¥ïÙñ±Jc[éøÕpè ¹TøçàaNžiÇÝK Æhxpo,§t ¶±~ÂM».; ð0¡¢FÎuLÞ4ùÍ<=þîé_@Jtm#*Þ9 œ`&·yÈŽä-á ÃÎÌçb£ð»^ðÉþ?·oNßvUuE)áœÎâ43]¥šT(xŸAݲ)îLm Q&²[/в¢vôÊŒ]¡<è[àfÇyMÅA~šòéŽ-Ñše^TI»ZT]#VJÖG| ñ<€!òJµh¹§G®oÌÌUÃCtÁôa× -swÞ:`ã +D³î`! Šýsvä*5ÐÄÏãTѬaâ@ØÁ0 +œüUY᮳ñëŽÜ°ÍŠ÷g3ªDç +)¿:ì +Ö¬²E}èBÁ Ì4î mŽiÚ) +]]+k]u¥i×4šï(áUÐbg7hêûìôÝüèDkµ®5EÓ>áó¡nÑvsÕ & =µayKDzYÐáÅl?°z§?¢)çN£ÇŽi }!]ËÛd*]îÅ€O0û'9Æ?©éĬT·8ã |ZÇeS»¶LµF6ÀxÌïÙ: Lly^Kè}ŒÎžêG'ì°€+`M+ ÈwDñi+óšçLk ž¯øP<? X}«ÈöŒB¯0LŽšÎÏÄ XäŒe\à8ÜÈbsÆb id»AòWžª ë}Ûba2 ;BÁ6ÃŽ\ÒäÐäzuÞ÷+ À>¥1[2e8íÊDRaKþM:-IÞbòEJ6&é#þQüÀ²KíY¯78l°µÇcÖu8 æ<Ĺiq®;ù{°BÉBwCMªªŠGL.Æáš<œo×ÝÉNa&-ŸQ-ËJ;D c@mšoQíg*¢å#Ò xv4âè¯lžà7Ç%NÝb6oÛg&éuÕiuàT#{úߌæ®Zã{³,·K$ <YÆ »Ã)ZªÁ²þíß±sôëÓ²Ô/'6|è³vzkæiÜÂ'ê ~9â@nÜ c,éèB +¢#Kzd`ç(Ö4á~ÊÙä3ýLõþøJÁ#úIà]1ï} 朡Xa;;Í lÜQÊ-ÍÄ mžcM¹Fóc"@×$¢ûÇÏ~, ŸüÊWn4.>3û³[>,Žæ±ÊS$÷Û Í»÷fCôŸßZø V£S+Æ€(þî\3°Fx³Ê²á ]ÊB [¡ÑÒÂ$µïûrDÃŽ+y¢24€|š·TLÄž5q5ðMPíüÉû'7jÑŠÍOé:{ñ~ ,àÅýÉA žÃØÒ.ìm<> 3?X²zF6ÝNa€&c5pœ¬,4Á¿èåF*-ó¢¬ý<Bºö4«6Øíy<fîž8sSûïŒ ÀRc`òÒÔï-ÓM/F³5ÓÛyš¥ +¡É% Ç¿V~9Øá?8ôžC×e*t8¯Úç,!ü`æïÓj¶ç&Ó m&àÃŒEC×s§°ý~ +è(©|¡ËÔdÂD8ëÙYÞdš¿#ÝŠè¹I>PwpóYì¬zPtpkN1Ú .m?Þ È)NùJšJG #ŸŠò|Gêoëî- +¬ÙŸ8H¹D' §É·òÅX£C ÄÐ!ÕhüO}">Äÿ(3Ùdyg + ÐGý1°xý¶éÃþ@ÁʯÃöW Â.ÕÆ=ÌW±GI 1¡¹Ç÷&0¯1 §8 Næ¶ÖÛ¯a=í°Øñ5¹)§Ãéw(ÈáSÔkŒ þeæDu \ No newline at end of file
Added: trunk/thirdparty/cl-paypal/.git/objects/b2/c22f4f042e5f95dc9d3ff9c4da5e36c966c988 =================================================================== (Binary files differ)
Property changes on: trunk/thirdparty/cl-paypal/.git/objects/b2/c22f4f042e5f95dc9d3ff9c4da5e36c966c988 ___________________________________________________________________ Added: svn:mime-type + application/octet-stream
Modified: trunk/thirdparty/cl-paypal/.git/refs/heads/develop =================================================================== --- trunk/thirdparty/cl-paypal/.git/refs/heads/develop 2010-09-16 20:03:53 UTC (rev 4612) +++ trunk/thirdparty/cl-paypal/.git/refs/heads/develop 2010-09-17 14:31:09 UTC (rev 4613) @@ -1 +1 @@ -6bddc89a7a42e3a67a9bb915f89d3225c588a381 +130c568d3db006611c3f633f04b6b51ef959b290
Modified: trunk/thirdparty/cl-paypal/.git/refs/remotes/writable/develop =================================================================== --- trunk/thirdparty/cl-paypal/.git/refs/remotes/writable/develop 2010-09-16 20:03:53 UTC (rev 4612) +++ trunk/thirdparty/cl-paypal/.git/refs/remotes/writable/develop 2010-09-17 14:31:09 UTC (rev 4613) @@ -1 +1 @@ -6bddc89a7a42e3a67a9bb915f89d3225c588a381 +130c568d3db006611c3f633f04b6b51ef959b290
Modified: trunk/thirdparty/cl-paypal/cl-paypal.lisp =================================================================== --- trunk/thirdparty/cl-paypal/cl-paypal.lisp 2010-09-16 20:03:53 UTC (rev 4612) +++ trunk/thirdparty/cl-paypal/cl-paypal.lisp 2010-09-17 14:31:09 UTC (rev 4613) @@ -28,6 +28,8 @@ (destructuring-bind (parameter-string value) (cl-ppcre:split "=" entry :limit 2) (setf parameter-string (cl-ppcre:regex-replace "PAYMENTREQUEST_0_" parameter-string "")) + (setf parameter-string + (cl-ppcre:regex-replace "PAYMENTINFO_0_" parameter-string "")) (multiple-value-bind (match registers) (cl-ppcre:scan-to-strings "^L_(.*?)([0-9]+)$" parameter-string) (if match (let* ((parameter (intern (aref registers 0) :keyword)) @@ -156,9 +158,10 @@ (token (getf res :token))) (register-transaction token amt currencycode ip) (values - (format nil "https://~A/webscr?cmd=_express-checkout&token=~A" + (format nil "https://~A/webscr?cmd=_express-checkout&token=~A&useraction=~A" hostname - (hunchentoot:url-encode token)) + (hunchentoot:url-encode token) + useraction) res)))
(defun get-express-checkout-info (token)
-
BKNR Commits