diff --git a/alterator-lookout/interfaces/guile/context.scm b/alterator-lookout/interfaces/guile/context.scm
index 714c345..4044a72 100644
--- a/alterator-lookout/interfaces/guile/context.scm
+++ b/alterator-lookout/interfaces/guile/context.scm
@@ -1,6 +1,7 @@
 (define-module (alterator context)
   :use-module (srfi srfi-1)
   :use-module (alterator algo)
+  :use-module (alterator fluids)
   :export (lookout-context
            change-context
            from-context
@@ -13,7 +14,7 @@
 ;; * current stack of globals
 ;; * current ids , etc.
 
-(define lookout-context (make-fluid))
+(define lookout-context (make-registered-fluid))
 (fluid-set! lookout-context '())
 
 (define (change-context name value)
diff --git a/alterator-lookout/interfaces/guile/session/common.scm b/alterator-lookout/interfaces/guile/session/common.scm
index 401d6af..ecde336 100644
--- a/alterator-lookout/interfaces/guile/session/common.scm
+++ b/alterator-lookout/interfaces/guile/session/common.scm
@@ -3,6 +3,7 @@
   :use-module (srfi srfi-1)
 
   :use-module (alterator algo)
+  :use-module (alterator fluids)
   :use-module (alterator object)
   :use-module (alterator session state)
   :use-module (alterator session widgets)
@@ -26,7 +27,7 @@
 (define max-session-count 100)
 (define max-session-timeout 10)
 
-(define generic-session (make-fluid))
+(define generic-session (make-registered-fluid))
 (fluid-set! generic-session '())
 
 ;;live flag is an indicator of unused sessions