From 58b47dd22440429495a586a13bf975fad4a5645e Mon Sep 17 00:00:00 2001 From: Mystery Man Date: Fri, 28 Mar 2003 17:06:34 +0000 Subject: This commit was manufactured by cvs2svn to create tag 'V9_1_29mdk'. --- docs/porting-ugtk | 48 ------------------------------------------------ 1 file changed, 48 deletions(-) delete mode 100755 docs/porting-ugtk (limited to 'docs/porting-ugtk') diff --git a/docs/porting-ugtk b/docs/porting-ugtk deleted file mode 100755 index a72faabb6..000000000 --- a/docs/porting-ugtk +++ /dev/null @@ -1,48 +0,0 @@ -#!/usr/bin/perl -pi -# -# $Id$ -# -# This is not an automatic gtk+-1.x to gtk+-2.x port tool, -# just a tool that ease perl apps' gtk2 port. -# you'll have to fix all remaining problems, beginning by spotted warnings -# it'll save you basic conversion work -# -# if you used Gtk::Text, a little more work will be needed (look at logdrake gtk2 port) -# if you used Gtk::CTree, Gtk::CList or worse, Gtk::Tree, you'll need quite a lot of exhausting work :-( -# -# usage: porting-ugtk -# -# hint: always use strict - -# switch to gtk2 : -s!Gtk:!Gtk2:!g; -/(use|require) Gtk/ and print STDERR "Warning: if this (bad) app that did not use my_gtk, you'll have a hard time :-)\n if not, using both Gtk && my_gtk was misdesigned ...\n"; -s!(use|require) Gtk.*!!g; # -s!my_gtk!ugtk2!g; - -# one should pass the right ":stuff" to "use ugtk2 qw();" -/ugtk::/ and print STDERR "Warning: you'll have to passe eiter :ask, :create, :helpers or :wrappers to ugtk\n"; -s!ugtk::!!g; -# if my_gtk wasn't used, this'll be spotted by the lack of "use ugtk2;" anyway -s!(require|use) ugtk.*!!g; - - -# deprecated : -/::(CTree|CList|Text[^V])/ and print STDERR "Warning: CTree, CList and Text widgets are deprecated... Good luck :-(\n"; -/gtkcreate_(png|xpm)/ and print STDERR "Warning: new Gtk::Pixmap(gtkcreate_(png|xpm)) should be replaced by gtkcreate_img\n"; -/set_policy/ and print STDERR "Warning: ->set_policy() should be replaced by allow_shrink/allow_grow/set_resizable\n"; - -# obsoletes methods||functions : -s!set_usize!set_size_request!g; -s!gtkset_set_border_width!gtkset_border_width!g; -s!border_width!set_border_width!g; -s!-(end|spread|extended|start|single)!'\1'!g; -s!createScrolledWindow!create_scrolled_window!g; -# quite a lot less usefull with gtk+2 but who knows... : -s!set_position\(1\)!set_position('center')!g; -s!gtkpng!gtkcreate_img!g; -# hacky but usefull in ->set_pixmap() context; else that'll be spoted at run time : -s!gtkcreate_png!gtkcreate_img!g; -# usefull sometimes but not in most cases : -#s!new GtkVBox!create_vbox!g; -#s!new GtkHBox!create_hbox!g; -- cgit v1.2.1