]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/bitcoin/client/client.factor
core, basis, extra: Remove DOS line endings from files.
[factor.git] / extra / bitcoin / client / client.factor
index 88926b0912d9688375816b494c28b324079149d7..d2221a77c335554e114d03f4bb42f9cd99327416 100644 (file)
@@ -48,7 +48,7 @@ IN: bitcoin.client
       bitcoin-server >>host
       bitcoin-port >>port ;
 
-:: payload ( method params -- data ) 
+:: payload ( method params -- data )
     "text/plain" <post-data>
         binary >>content-encoding
         H{
@@ -58,10 +58,10 @@ IN: bitcoin.client
 
 : basic-auth ( -- string )
     bitcoin-user bitcoin-password ":" glue >base64 >string
-    "Basic " prepend ; 
+    "Basic " prepend ;
 
 : bitcoin-request ( method params -- request )
-    payload bitcoin-url <post-request> 
+    payload bitcoin-url <post-request>
     basic-auth "Authorization" set-header
     dup post-data>> data>> length "Content-Length" set-header
     http-request nip >string json> "result" of ;
@@ -137,4 +137,3 @@ PRIVATE>
 #! requires patched bitcoind
 :: list-transactions ( count include-generated -- seq )
     "listtransactions" { count include-generated } bitcoin-request ;
-