===================================================================
RCS file: /home/cvs/OpenXM/rc/asirrc,v
retrieving revision 1.11
retrieving revision 1.13
diff -u -p -r1.11 -r1.13
--- OpenXM/rc/asirrc	2003/05/18 00:13:14	1.11
+++ OpenXM/rc/asirrc	2003/12/12 03:04:22	1.13
@@ -1,4 +1,4 @@
-/*$OpenXM: OpenXM/rc/asirrc,v 1.10 2003/01/01 02:03:40 takayama Exp $*/
+/*$OpenXM: OpenXM/rc/asirrc,v 1.12 2003/10/19 06:07:45 takayama Exp $*/
 load("gr")$
 load("primdec")$
 load("katsura")$
@@ -7,8 +7,8 @@ load("names.rr")$
 load("oxrfc103.rr")$
 User_asirrc=which(getenv("HOME")+"/.asirrc")$
 if (type(User_asirrc)!=0) {
-   print("Loading ~/.asirrc")$
+   if (!ctrl("quiet_mode")) print("Loading ~/.asirrc")$
    load(User_asirrc)$
-}$
+}else{ }$
 end$