summaryrefslogtreecommitdiff
path: root/src/adapad.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/adapad.adb')
-rw-r--r--src/adapad.adb8
1 files changed, 3 insertions, 5 deletions
diff --git a/src/adapad.adb b/src/adapad.adb
index 03ace13..7ba743e 100644
--- a/src/adapad.adb
+++ b/src/adapad.adb
@@ -37,9 +37,9 @@ function Adapad return Integer is
Editor : Editor_Window := Create (800, 500);
Buffer : Text_Buffer := Create;
- About : About_Window := Create (350, 250);
- Find : Find_Window := Create (200, 100);
- Replace : Replace_Window := Create (200, 100);
+ About : About_Window := Create;
+ Find : Find_Window := Create;
+ Replace : Replace_Window := Create;
Changed : Boolean := False;
Filename : Unbounded_String := To_Unbounded_String (0);
@@ -216,7 +216,6 @@ function Adapad return Integer is
Item : in out Widget'Class) is
begin
Centre (Find);
- Find.Reset;
Find.Show;
end Call;
@@ -231,7 +230,6 @@ function Adapad return Integer is
Item : in out Widget'Class) is
begin
Centre (Replace);
- Replace.Reset;
Replace.Show;
end Call;