From 44a8bbe3e4a458e858e41150586245753859446a Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Tue, 24 Jul 2012 15:04:08 -0700
Subject: [PATCH] couchdb: use CONSTANT:.

---
 extra/couchdb/couchdb.factor | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/extra/couchdb/couchdb.factor b/extra/couchdb/couchdb.factor
index 9e1e49babd..5665246246 100644
--- a/extra/couchdb/couchdb.factor
+++ b/extra/couchdb/couchdb.factor
@@ -60,9 +60,9 @@ PREDICATE: file-exists-error < couchdb-error
 ! server
 TUPLE: server { host string } { port integer } { uuids vector } { uuids-to-cache integer } ;
 
-: default-couch-host ( -- host ) "localhost" ; inline
-: default-couch-port ( -- port ) 5984 ; inline
-: default-uuids-to-cache ( -- n ) 100 ; inline
+CONSTANT: default-couch-host "localhost"
+CONSTANT: default-couch-port 5984
+CONSTANT: default-uuids-to-cache 100
 
 : <server> ( host port -- server )
     V{ } clone default-uuids-to-cache server boa ;