diff --git a/changelog b/changelog
index 6d3b0b6..09919c7 100644
--- a/changelog
+++ b/changelog
@@ -1,3 +1,4 @@
+20071215 gxv src/graph/viewman/makegraph.c discardGraph free corrected (7023)
 20071215 tpd src/hyper/Makefile fix typo in bookvol11 building stanza
 20071215 tpd src/hyper/axbook.tgz fix the user/group settings
 20071215 tpd src/interp/bookvol5 browse and top-level command handling
diff --git a/src/graph/viewman/makegraph.c.pamphlet b/src/graph/viewman/makegraph.c.pamphlet
index 0a4c7da..18dcc3d 100644
--- a/src/graph/viewman/makegraph.c.pamphlet
+++ b/src/graph/viewman/makegraph.c.pamphlet
@@ -143,7 +143,7 @@ discardGraph (graphStruct *theGraph)
   for (j=0, pL=theGraph->listOfListsOfPoints; 
           j<theGraph->numberOfLists; j++,pL++)
     free(pL->listOfPoints);
-  free(pL);
+  free(theGraph->listOfListsOfPoints);
   free(theGraph);
 
 }