+gladewsrc
authorshort <>
Tue, 14 Oct 2003 19:36:08 +0000 (19:36 +0000)
committershort <>
Tue, 14 Oct 2003 19:36:08 +0000 (19:36 +0000)
configure.ac
project/Makefile.am
project/gladewsrc/Index.html.pl [new file with mode: 0755]
project/gladewsrc/ListItem.pm [new file with mode: 0755]
project/gladewsrc/Makefile.am [new file with mode: 0644]
project/gladewsrc/glade-0.5.7-writesource.diff [new file with mode: 0644]
project/muttsort/Index.html.pl

index 8a41535..34e5349 100644 (file)
@@ -98,6 +98,7 @@ Makefile
 ./project/int13sniff/Makefile
 ./project/libtool/Makefile
 ./project/muttsort/Makefile
+./project/gladewsrc/Makefile
 ])
 
 echo done.
index 9dc5d9b..0963a3e 100644 (file)
@@ -80,7 +80,8 @@ SUBDIRS= \
                pgsqlsubstr     \
                int13sniff      \
                libtool         \
-               muttsort
+               muttsort        \
+               gladewsrc
 
 EXTRA_DIST+= \
                Index.html.pl \
diff --git a/project/gladewsrc/Index.html.pl b/project/gladewsrc/Index.html.pl
new file mode 100755 (executable)
index 0000000..3b73d5c
--- /dev/null
@@ -0,0 +1,46 @@
+#! /usr/bin/perl
+# 
+# $Id$
+# Main page of 'My::Project::gladewsrc'
+# Copyright (C) 2003 Jan Kratochvil <project-www.jankratochvil.net@jankratochvil.net>
+# 
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; exactly version 2 of June 1991 is required
+# 
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+# 
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+
+package project::gladewsrc::Index;
+require 5.6.0; # at least 'use warnings;' but we need some 5.6.0+ modules anyway
+our $VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
+our $CVS_ID=q$Id$;
+use strict;
+use warnings;
+
+BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
+use My::Web;
+Wuse 'My::Project';
+Wuse 'project::gladewsrc::ListItem';
+
+
+My::Project->init_project(
+               "__PACKAGE__"=>__PACKAGE__,
+               "ListItem"=>\@project::gladewsrc::ListItem::ListItem,
+               );
+
+
+print <<"HERE";
+<p>Patch got integrated to <b>glade/main.c</b> revision <b>1.10</b> (although
+modified by Damon Chaplin).</p>
+HERE
+
+
+My::Web->footer();
diff --git a/project/gladewsrc/ListItem.pm b/project/gladewsrc/ListItem.pm
new file mode 100755 (executable)
index 0000000..abd6957
--- /dev/null
@@ -0,0 +1,47 @@
+#! /usr/bin/perl
+# 
+# $Id$
+# Definition of 'My::Project::gladewsrc' for list.cgi.pl
+# Copyright (C) 2003 Jan Kratochvil <project-www.jankratochvil.net@jankratochvil.net>
+# 
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; exactly version 2 of June 1991 is required
+# 
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+# 
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+
+package project::gladewsrc::ListItem;
+require 5.6.0; # at least 'use warnings;' but we need some 5.6.0+ modules anyway
+our $VERSION=do { my @r=(q$Revision$=~/\d+/g); sprintf "%d.".("%03d"x$#r),@r; };
+our $CVS_ID=q$Id$;
+use strict;
+use warnings;
+
+use My::Web;
+
+
+our @ListItem=(
+               "name"=>a_href('http://glade.gnome.org/','Glade').' -w',
+               "platform"=>"patch",
+               "priority"=>4,
+               "summary"=>'Option <i>--write-source</i> for batch compilation',
+               "download-original patch"=>'glade-0.5.7-writesource.diff',
+               "link-ChangeLog entry"=>'http://cvs.gnome.org/bonsai/cvslog.cgi?file=glade%2Fglade/main.c&root=/cvs/gnome#1.10',
+               "license"=>"GPL",
+               "maintenance"=>"accepted",
+               "language"=>"C patch",
+               "description"=><<"HERE",
+<p>Automatically generate {interface,support}.[ch] and other source files
+by @{[ a_href 'http://glade.gnome.org/','Glade' ]}.</p>
+HERE
+               );
+
+1;
diff --git a/project/gladewsrc/Makefile.am b/project/gladewsrc/Makefile.am
new file mode 100644 (file)
index 0000000..f5f5772
--- /dev/null
@@ -0,0 +1,23 @@
+# $Id$
+# automake source for the Makefile of project/gladewsrc/ subdir
+# Copyright (C) 2003 Jan Kratochvil <project-www.jankratochvil.net@jankratochvil.net>
+# 
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; exactly version 2 of June 1991 is required
+# 
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+# 
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+
+include $(top_srcdir)/Makefile-head.am
+
+EXTRA_DIST+= \
+       ListItem.pm \
+       Index.html.pl
diff --git a/project/gladewsrc/glade-0.5.7-writesource.diff b/project/gladewsrc/glade-0.5.7-writesource.diff
new file mode 100644 (file)
index 0000000..d7ebd48
--- /dev/null
@@ -0,0 +1,162 @@
+diff -ru -x *.pot -x cat-id-tbl* glade-0.5.7-orig/glade/main.c glade-0.5.7/glade/main.c
+--- glade-0.5.7-orig/glade/main.c      Wed Dec 22 17:01:00 1999
++++ glade-0.5.7/glade/main.c   Sun Mar 12 20:44:11 2000
+@@ -36,14 +36,31 @@
+ static void parse_command_line (int argc,
+                               char *argv[],
+                               GladeProjectWindow *project_window);
++static void post_command_line (GladeProjectWindow *project_window);
+ static void usage (void);
++/* Currently we handle only command-line arguments an XML file to load
++   and request for source build.
++   For Gnome we have to use popt, even though we have no options. */
++
++static gchar *arg_filename=NULL;
++static int arg_write_source=0;
++
+ #ifdef USE_GNOME
+ static poptContext pctx;
+ static struct poptOption options[] = {
+   {
++    "writesource",
++    'w',
++    0,
++    &arg_write_source,
++    0,
++    N_("Whether to automatically (and only) build the source files"),
++    NULL
++  },
++  {
+     NULL,
+     '\0',
+     0,
+@@ -95,6 +112,7 @@
+   glade_show_property_editor ();
+   parse_command_line (argc, argv, project_window);
++  post_command_line (project_window);
+   if (current_project == NULL)
+     glade_project_new ();
+@@ -104,15 +122,44 @@
+   return 0;
+ }
++static void
++post_command_line (GladeProjectWindow *project_window)
++{
++  gchar *directory;
++  GladeProject *project;
++  GladeError *error;
++
++  if (arg_filename)
++    {
++      directory = g_get_current_dir ();
++      arg_filename = glade_util_make_absolute_path (directory, arg_filename);
++      glade_project_window_open_project (project_window, arg_filename);
++      g_free (directory);
++      g_free (arg_filename);
++    }
++  if (arg_write_source)
++    {
++      if (!arg_filename) {
++        fprintf(stderr,_("Project name not specified, requited for \"--writesource\" option.\n"));
++      exit(1);
++        }
++      project = glade_project_view_get_project (GLADE_PROJECT_VIEW (project_window->project_view));
++      g_return_if_fail (project != NULL);
++      error = glade_project_write_source (project);
++      if (error) {
++              fprintf(stderr,_("Error writing source, use GUI to fix it.\n"));
++      glade_error_free (error);
++      exit(1);
++      }
++      exit(0);
++    }
++}
+-/* Currently the only command-line argument we handle is an XML file to load.
+-   For Gnome we have to use popt, even though we have no options. */
+ #ifdef USE_GNOME
+ static void
+ parse_command_line (int argc, char *argv[],
+                   GladeProjectWindow *project_window)
+ {
+-  gchar *filename = NULL, *directory;
+   const gchar **args;
+   gint i;
+@@ -120,22 +167,13 @@
+   for (i = 0; args && args[i]; i++)
+     {
+-      if (filename == NULL)
+-      filename = (gchar*) args[i];
+-      else
+-      usage ();
++    if (arg_filename == NULL)
++      arg_filename = (gchar*) args[i];
++    else
++      usage ();
+     }
+   poptFreeContext (pctx);
+-
+-  if (filename)
+-    {
+-      directory = g_get_current_dir ();
+-      filename = glade_util_make_absolute_path (directory, filename);
+-      glade_project_window_open_project (project_window, filename);
+-      g_free (directory);
+-      g_free (filename);
+-    }
+ }
+ #else
+@@ -143,28 +181,18 @@
+ parse_command_line (int argc, char *argv[],
+                   GladeProjectWindow *project_window)
+ {
+-  gchar *filename = NULL, *directory;
+   gint i;
+   /* GTK parses argc & argv and sets arguments to NULL if it has used them. */
+   for (i = 1; i < argc; i++)
+     {
+-      if (argv[i])
+-      {
+-        if (filename == NULL)
+-          filename = argv[i];
+-        else
+-          usage ();
+-      }
+-    }
+-
+-  if (filename)
+-    {
+-      directory = g_get_current_dir ();
+-      filename = glade_util_make_absolute_path (directory, filename);
+-      glade_project_window_open_project (project_window, filename);
+-      g_free (directory);
+-      g_free (filename);
++      if (!argv[i]) continue;
++      if (!strcmp(argv[i],"-w") || !strcmp(argv[i],"--writesource"))
++      arg_write_source = 1;
++      else if (arg_filename == NULL)
++      arg_filename = (gchar*) argv[i];
++      else
++      usage ();
+     }
+ }
+ #endif
+@@ -173,6 +201,6 @@
+ static void
+ usage (void)
+ {
+-  fprintf (stderr, "Usage: glade [filename]\n");
++  fprintf (stderr, "Usage: glade [-w|--writesource] [<filename>]\n");
+   exit (0);
+ }
index 229ee2c..13e0596 100755 (executable)
@@ -38,7 +38,7 @@ My::Project->init_project(
 
 
 print <<"HERE";
-<p>Patch got integrated to <b>thread.c</b>, revision <b>2.16</b>.</p>
+<p>Patch got integrated to <b>thread.c</b> revision <b>2.16</b>.</p>
 HERE