From 469106629c8de5977cb538e95fb209671f5bf331 Mon Sep 17 00:00:00 2001
From: Jonas Maebe <jonas@freepascal.org>
Date: Sun, 27 Jun 2010 12:38:30 +0000
Subject: [PATCH]   * properly initialise graphresult when setgraphmode is
 called directly     (patch by Nikolay Nikolov, mantis #16798)

git-svn-id: trunk@15485 -
---
 packages/graph/src/inc/modes.inc | 1 +
 1 file changed, 1 insertion(+)

diff --git a/packages/graph/src/inc/modes.inc b/packages/graph/src/inc/modes.inc
index bcbcaa232e..651104a5fe 100644
--- a/packages/graph/src/inc/modes.inc
+++ b/packages/graph/src/inc/modes.inc
@@ -549,6 +549,7 @@ end;
           _GraphResult := grInvalidMode;
           exit;
         end;
+      _GraphResult := grOk;
       modeinfo^.InitMode;
       if _GraphResult <> grOk then
         begin