continuations[-docs]: add the finally word

[factor.git] / basis / environment / environment.factor

diff --git a/basis/environment/environment.factor b/basis/environment/environment.factor
index 79c83733a3bfd59713952748ef1c772eb514864e..f945d2933c516da43a40767382547e84c5647ed8 100644 (file)
--- a/basis/environment/environment.factor
+++ b/basis/environment/environment.factor
@@ -27,7 +27,7 @@ HOOK: set-os-envs-pointer os ( malloc -- )
 
 : with-os-env ( value key quot -- )
     over [ [ [ set-os-env ] 2curry ] [ compose ] bi* ] dip
-    [ os-env ] keep [ set-os-env ] 2curry [ ] cleanup ; inline
+    [ os-env ] keep [ set-os-env ] 2curry finally ; inline
 
 {
     { [ os unix? ] [ "environment.unix" require ] }