From a9dc8441be3b130724b94c088401dc286f51094a Mon Sep 17 00:00:00 2001
From: macpgmr <macpgmr@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Mon, 4 Jan 2010 21:13:56 +0000
Subject: [PATCH] Moved TCustomGeckoBrowser's InitWebBrowser from private to
 public so it can be used in Lazarus designer.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1113 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 components/geckoport/Components/GeckoBrowser.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/components/geckoport/Components/GeckoBrowser.pas b/components/geckoport/Components/GeckoBrowser.pas
index 6f7afa931..91a5d133e 100755
--- a/components/geckoport/Components/GeckoBrowser.pas
+++ b/components/geckoport/Components/GeckoBrowser.pas
@@ -160,7 +160,6 @@ type
 
     FOnNewWindow: TGeckoBrowserNewWindow;
 
-    procedure InitWebBrowser;
     procedure ShutdownWebBrowser;
     procedure InnerLoadURI(uri: WideString; Flags: PRUint32;
       referer: nsIURI; postData, headers: TStream);
@@ -187,6 +186,7 @@ type
   public
     constructor Create(AOwner: TComponent); override;
     destructor Destroy; override;
+    procedure InitWebBrowser;  //FPC port: moved from private to public 
     procedure LoadURI(const uri: WideString); overload;
     procedure LoadURI(const uri: WideString; const referer: UTF8String);
       overload;