From 104468093d58bca6db7bcbc50caafafa6625c111 Mon Sep 17 00:00:00 2001
From: pierre <pierre@freepascal.org>
Date: Mon, 10 Jan 2000 15:53:37 +0000
Subject: [PATCH] * WViews objects were not registered

---
 ide/text/fp.pas     |  8 ++++++--
 ide/text/wviews.pas | 11 +++++++----
 2 files changed, 13 insertions(+), 6 deletions(-)

diff --git a/ide/text/fp.pas b/ide/text/fp.pas
index 3a2d72a046..1d374c5ec5 100644
--- a/ide/text/fp.pas
+++ b/ide/text/fp.pas
@@ -122,6 +122,7 @@ begin
   RegisterObjects;
   RegisterValidate;
   RegisterViews;
+  RegisterWViews;
 end;
 
 var CanExit : boolean;
@@ -206,7 +207,10 @@ BEGIN
 END.
 {
   $Log$
-  Revision 1.35  2000-01-03 11:38:33  michael
+  Revision 1.36  2000-01-10 15:53:37  pierre
+  * WViews objects were not registered
+
+  Revision 1.35  2000/01/03 11:38:33  michael
   Changes from Gabor
 
   Revision 1.34  1999/12/20 14:23:16  pierre
@@ -359,4 +363,4 @@ END.
     + Added symbol browser
     * splitted fp.pas to fpide.pas
 
-}
+}
\ No newline at end of file
diff --git a/ide/text/wviews.pas b/ide/text/wviews.pas
index d5701c1522..fe23f37ae6 100644
--- a/ide/text/wviews.pas
+++ b/ide/text/wviews.pas
@@ -193,7 +193,7 @@ function  GetMenuItemBefore(Menu:PMenu; BeforeOf: PMenuItem): PMenuItem;
 
 procedure NotImplemented;
 
-procedure RegistersWViews;
+procedure RegisterWViews;
 
 implementation
 
@@ -2065,7 +2065,7 @@ begin
   S.Write(Default,SizeOf(Default));
 end;
 
-procedure RegistersWViews;
+procedure RegisterWViews;
 begin
 {$ifndef NOOBJREG}
   RegisterType(RAdvancedListBox);
@@ -2079,7 +2079,10 @@ end;
 END.
 {
   $Log$
-  Revision 1.10  1999-08-03 20:22:46  peter
+  Revision 1.11  2000-01-10 15:53:37  pierre
+  * WViews objects were not registered
+
+  Revision 1.10  1999/08/03 20:22:46  peter
     + TTab acts now on Ctrl+Tab and Ctrl+Shift+Tab...
     + Desktop saving should work now
        - History saved
@@ -2133,4 +2136,4 @@ END.
   Revision 1.1  1999/03/01 15:51:43  peter
     + Log
 
-}
+}
\ No newline at end of file