From 1f75e48cef3ca9dfd37eea3c5e86a0c18ac7a6dc Mon Sep 17 00:00:00 2001
From: "Kartik K. Agaram" <vc@akkartik.com>
Date: Thu, 6 Nov 2014 10:21:15 -0800
Subject: 230

---
 mu.arc | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/mu.arc b/mu.arc
index 744e8515..d450c77c 100644
--- a/mu.arc
+++ b/mu.arc
@@ -93,7 +93,8 @@
 (def trace (label . args)
 ;?   (prn "trace: " dump-trace*)
   (when (or (is dump-trace* t)
-            (and dump-trace* (~pos label dump-trace*!blacklist)))
+            (and dump-trace* (pos label dump-trace*!whitelist))
+            (and dump-trace* (no dump-trace*!whitelist) (~pos label dump-trace*!blacklist)))
     (apply prn label ": " args))
   (enq (list label (apply tostring:prn args))
        traces*))
-- 
cgit 1.4.1-2-gfad0