make silent by default

2012-04-12 16:58:03 +00:00 · 2012-04-12 16:58:03 +00:00 · 2fbaf856f5
parent 0c2a033f5c
commit 2fbaf856f5
1 changed files with 1 additions and 1 deletions
--- a/p/C0XF2N.m
+++ b/p/C0XF2N.m
@ -526,7 +526,7 @@ ADDINN(ZG,ZS,ZARY) ; ADD IF NOT NULL
 F  S ZI=$O(ZARY(ZI)) Q:ZI=""  D  ;
 . I ZARY(ZI)'="" D  ;
 . . D ADD^C0XF2N(ZG,ZS,ZI,ZARY(ZI))
- . . W !,"ADDING",ZI," ",ZARY(ZI)
+ . . I $D(DEBUG) W !,"ADDING",ZI," ",ZARY(ZI)
 ;ZWR ZARY
 Q
 ;