[mcclim-cvs] CVS mcclim

[crhodes]

Update of /project/mcclim/cvsroot/mcclim
In directory clnet:/tmp/cvs-serv11084

Modified Files:
	graph-formatting.lisp 
Log Message:
Only one version of format-graph-from-roots, please


--- /project/mcclim/cvsroot/mcclim/graph-formatting.lisp	2007/09/16 22:39:22	1.21
+++ /project/mcclim/cvsroot/mcclim/graph-formatting.lisp	2007/09/17 19:20:49	1.22
@@ -3,7 +3,7 @@
 ;;;     Title: Graph Formatting
 ;;;   Created: 2002-08-13
 ;;;   License: LGPL (See file COPYING for details).
-;;;       $Id: graph-formatting.lisp,v 1.21 2007/09/16 22:39:22 rgoldman Exp $
+;;;       $Id: graph-formatting.lisp,v 1.22 2007/09/17 19:20:49 crhodes Exp $
 ;;; ---------------------------------------------------------------------------
 
 ;;;  (c) copyright 2002 by Gilbert Baumann
@@ -190,9 +190,6 @@
 		    (bounding-rectangle-max-y graph-output-record))))
 	graph-output-record))))
 
-(defun format-graph-from-root (root &rest rest)
-  (apply #'format-graph-from-roots (list root) rest))
-
 ;;;; Graph Output Records
 
 (defclass standard-graph-output-record (graph-output-record