From 6d1663fdc5fc316d92b283ebb75e99ba4f7a408d Mon Sep 17 00:00:00 2001
From: nickysn <nickysn@gmail.com>
Date: Tue, 8 Oct 2013 19:20:54 +0000
Subject: [PATCH] * the TNewModeInfo record type moved to the implementation
 part of the graph   unit. It is extremely unlikely that this type was ever
 used by programs,   because:   1) the newModeInfo structure of this type is
 in the implementation part of      the unit   2) none of the graph unit
 procedures and functions use this type either as a      parameter or as a
 function result

git-svn-id: trunk@25724 -
---
 packages/graph/src/inc/graph.inc  | 8 ++++++++
 packages/graph/src/inc/graphh.inc | 7 -------
 2 files changed, 8 insertions(+), 7 deletions(-)

diff --git a/packages/graph/src/inc/graph.inc b/packages/graph/src/inc/graph.inc
index 3a66689431..58a05db870 100644
--- a/packages/graph/src/inc/graph.inc
+++ b/packages/graph/src/inc/graph.inc
@@ -113,6 +113,14 @@ var
   ArcCall: ArcCoordsType;   { Information on the last call to Arc or Ellipse }
 
 
+type
+  TNewModeInfo = record
+    modeInfo: array[lowNewDriver..highNewDriver] of PModeInfo;
+    loHiModeNr: array[lowNewDriver..highNewDriver] of record
+      lo,hi: smallint;
+    end;
+  end;
+
 var
 
   { ******************** HARDWARE INFORMATION ********************* }
diff --git a/packages/graph/src/inc/graphh.inc b/packages/graph/src/inc/graphh.inc
index b5b2d3fa43..14371327d8 100644
--- a/packages/graph/src/inc/graphh.inc
+++ b/packages/graph/src/inc/graphh.inc
@@ -647,13 +647,6 @@ TYPE
       next: PModeInfo;
     end;
 
-    TNewModeInfo = record
-      modeInfo: array[lowNewDriver..highNewDriver] of PModeInfo;
-      loHiModeNr: array[lowNewDriver..highNewDriver] of record
-        lo,hi: smallint;
-      end;
-    end;
-
 
 
 VAR