[noctool-cvs] CVS source

[jprewett]

Update of /project/noctool/cvsroot/source
In directory clnet:/tmp/cvs-serv23117

Modified Files:
	classes.lisp 
Log Message:

added :AFTER method for initialize-instance for the PING-MONITOR class so that it will add-graphs to the ping-monitor by default.



--- /project/noctool/cvsroot/source/classes.lisp	2008/05/17 12:43:27	1.2
+++ /project/noctool/cvsroot/source/classes.lisp	2008/06/02 19:12:08	1.3
@@ -85,6 +85,9 @@
    )
   (:default-initargs :interval 60))
 
+(defmethod initialize-instance :after ((instance ping-monitor) &key)
+  (add-graphs instance))
+
 (add-graph-info ping-monitor graph gauge-graph percentile-graph-display)
 
 (defclass disk-monitor (monitor)