Merge pull request #71 from perl6/revert-70-master

Revert "update"

Author: finanalyst

META6.json

@@ -31,7 +31,6 @@
         "GTK::Simple::MenuBar"           : "lib/GTK/Simple/MenuBar.pm6",
         "GTK::Simple::MenuItem"          : "lib/GTK/Simple/MenuItem.pm6",
         "GTK::Simple::MenuToolButton"    : "lib/GTK/Simple/MenuToolButton.pm6",
-        "GTK::Simple::Paned"             : "lib/GTK/Simple/Paned.pm6",
         "GTK::Simple::PlacesSidebar"     : "lib/GTK/Simple/PlacesSidebar.pm6",
         "GTK::Simple::ProgressBar"       : "lib/GTK/Simple/ProgressBar.pm6",
         "GTK::Simple::PropertyFacade"    : "lib/GTK/Simple/PropertyFacade.pm6",

README.md

@@ -21,7 +21,6 @@ Menu              | A simple menu with a menu item label
 MenuBar           | A simple menu bar that contain one or more menus
 MenuItem          | A simple menu item that can have a sub menu
 MenuToolButton    | A menu tool button with a label or an icon
-Pane              | Split window into 2 panes (vert or hori) with movable separator
 PlacesSidebar     | Sidebar that displays frequently-used places in the file system
 Scale             | Allows for a number to be provided by the user
 ScrolledWindow    | Container for widgets needing scrolling, eg., multiline texts

examples/17-scrolled-window-with-textview.p6

@@ -5,7 +5,7 @@ use lib 'lib';
 use GTK::Simple;
 
 my $app = GTK::Simple::App.new(title=> 'Example 17');
-my $send-history = GTK::Simple::TextView.new;
+my $send-history = GTK::Simple::TextView.new(text=>'Old stuff');
 my $flood-data = GTK::Simple::ToggleButton.new(label=>'Flood with stuff');
 my $exit-b = GTK::Simple::ToggleButton.new(label=>'Exit');
 

examples/18-pane-with-frames.p6

@@ -23,7 +23,6 @@ need GTK::Simple::DrawingArea;
 need GTK::Simple::Switch;
 need GTK::Simple::StatusBar;
 need GTK::Simple::Separator;
-need GTK::Simple::Paned;
 need GTK::Simple::ProgressBar;
 need GTK::Simple::Frame;
 need GTK::Simple::ComboBoxText;

lib/GTK/Simple.pm6

@@ -1006,42 +1006,13 @@ sub gtk_scrolled_window_new(Pointer $h-adjustment, Pointer $v-adjustment)
     is native(&gtk-lib)
     is export(:scrolled-window)
     { * }
-
+    
 sub gtk_scrolled_window_set_policy(GtkWidget $scrolled_window, 
                                   int32 $h-bar-policy, 
                                   int32 $v-bar-policy)
     is native(&gtk-lib)
     is export(:scrolled-window)
     { * }
-#
-# Pane
-#
-sub gtk_paned_new( int32 $orientation )
-    returns GtkWidget
-    is native(&gtk-lib)
-    is export(:paned)
-    { * }
 
-sub gtk_paned_add1( GtkWidget $pane, GtkWidget $child )
-    is native(&gtk-lib)
-    is export(:paned)
-    { * }
+                                   
 
-sub gtk_paned_add2( GtkWidget $pane, GtkWidget $child )
-    is native(&gtk-lib)
-    is export(:paned)
-    { * }
-
-sub gtk_paned_pack1(GtkWidget $pane, GtkWidget $child, Bool $resize, Bool $shrink)
-    is native(&gtk-lib)
-    is export(:paned)
-    { * }
-
-sub gtk_paned_pack2(GtkWidget $pane, GtkWidget $child, Bool $resize, Bool $shrink)
-    is native(&gtk-lib)
-    is export(:paned)
-    { * }
-sub gtk_paned_set_position(GtkWidget $pane, int32 $position )
-    is native( &gtk-lib )
-    is export(:paned)
-    { * }