io.pools: Fix load

db4
Doug Coleman 2013-03-24 21:40:29 -07:00
parent b099cbb1f2
commit efc2dedab4
1 changed files with 1 additions and 1 deletions

View File

@ -45,7 +45,7 @@ GENERIC: make-connection ( pool -- conn )
[ [ acquire-connection ] keep ] dip
[ (with-pooled-connection) ] [ ] [ 2drop dispose ] cleanup ; inline
M: return-connection dispose
M: return-connection-state dispose
[ conn>> ] [ pool>> ] bi return-connection ;
: return-connection-later ( db pool -- )