summaryrefslogtreecommitdiff
path: root/packages/graph
diff options
context:
space:
mode:
authornickysn <nickysn@3ad0048d-3df7-0310-abae-a5850022a9f2>2010-09-11 20:42:33 +0000
committernickysn <nickysn@3ad0048d-3df7-0310-abae-a5850022a9f2>2010-09-11 20:42:33 +0000
commit050aebdca4f1de336f1cce8203ff251742066d42 (patch)
tree63e525e5d3c8756985c6bc1d83c5b6f00982fec7 /packages/graph
parent5907f238c4d23d37037cb2e57212604725366481 (diff)
downloadfpc-050aebdca4f1de336f1cce8203ff251742066d42.tar.gz
* GetModeName fixed to work with the 'old' mode numbers also
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@15970 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'packages/graph')
-rw-r--r--packages/graph/src/inc/modes.inc5
1 files changed, 4 insertions, 1 deletions
diff --git a/packages/graph/src/inc/modes.inc b/packages/graph/src/inc/modes.inc
index 651104a5fe..dbd03850ed 100644
--- a/packages/graph/src/inc/modes.inc
+++ b/packages/graph/src/inc/modes.inc
@@ -316,7 +316,10 @@ end;
mode:=nil;
GetModeName:='';
{ only search in the current driver modes ... }
- mode:=SearchMode(IntCurrentNewDriver,ModeNumber);
+ if (ModeNumber >= lowNewMode) and (ModeNumber <= highNewMode) then
+ mode:=SearchMode(IntCurrentNewDriver,ModeNumber)
+ else
+ mode:=SearchMode(IntCurrentDriver,ModeNumber);
if assigned(mode) then
GetModeName:=Mode^.ModeName
else