SF.net SVN: geany: [848] trunk

[eht16 at users.sourceforge.net]

Revision: 848
          http://svn.sourceforge.net/geany/?rev=848&view=rev
Author:   eht16
Date:     2006-09-29 00:22:46 -0700 (Fri, 29 Sep 2006)

Log Message:
-----------
Added pattern *.agi for filetype Perl (closes #1567355).

Modified Paths:
--------------
    trunk/ChangeLog
    trunk/data/filetype_extensions.conf
    trunk/src/filetypes.c

Modified: trunk/ChangeLog
===================================================================
--- trunk/ChangeLog	2006-09-28 22:17:12 UTC (rev 847)
+++ trunk/ChangeLog	2006-09-29 07:22:46 UTC (rev 848)
@@ -1,3 +1,9 @@
+2006-09-29  Enrico Tröger  <enrico.troeger at uvena.de>
+
+ * src/filetypes.c, data/filetype_extensions.conf:
+   Added pattern *.agi for filetype Perl (closes #1567355).
+
+
 2006-09-27  Nick Treleaven  <nick.treleaven at btinternet.com>
 
  * src/vte.c: Change VTE word selection chars to include paths.

Modified: trunk/data/filetype_extensions.conf
===================================================================
--- trunk/data/filetype_extensions.conf	2006-09-28 22:17:12 UTC (rev 847)
+++ trunk/data/filetype_extensions.conf	2006-09-29 07:22:46 UTC (rev 848)
@@ -11,7 +11,7 @@
 Fortran=*.f;*.f77;*.f90;*.f95;*.for;*.ftn;
 Ferite=*.fe;
 CAML=*.ml;*.mli;
-Perl=*.pl;*.perl;*.pm;
+Perl=*.pl;*.perl;*.pm;*.agi;
 PHP=*.php;*.php3;*.php4;*.php5;*.phtml;
 Python=*.py;*.pyw;
 Ruby=*.rb;*.rhtml;

Modified: trunk/src/filetypes.c
===================================================================
--- trunk/src/filetypes.c	2006-09-28 22:17:12 UTC (rev 847)
+++ trunk/src/filetypes.c	2006-09-29 07:22:46 UTC (rev 848)
@@ -298,11 +298,12 @@
 	filetypes[GEANY_FILETYPES_PERL]->has_tags = TRUE;
 	filetypes[GEANY_FILETYPES_PERL]->title = g_strdup(_("Perl source file"));
 	filetypes[GEANY_FILETYPES_PERL]->extension = g_strdup("perl");
-	filetypes[GEANY_FILETYPES_PERL]->pattern = g_new0(gchar*, 4);
+	filetypes[GEANY_FILETYPES_PERL]->pattern = g_new0(gchar*, 5);
 	filetypes[GEANY_FILETYPES_PERL]->pattern[0] = g_strdup("*.pl");
 	filetypes[GEANY_FILETYPES_PERL]->pattern[1] = g_strdup("*.perl");
 	filetypes[GEANY_FILETYPES_PERL]->pattern[2] = g_strdup("*.pm");
-	filetypes[GEANY_FILETYPES_PERL]->pattern[3] = NULL;
+	filetypes[GEANY_FILETYPES_PERL]->pattern[3] = g_strdup("*.agi");
+	filetypes[GEANY_FILETYPES_PERL]->pattern[4] = NULL;
 	filetypes[GEANY_FILETYPES_PERL]->comment_open = g_strdup("#");
 	filetypes[GEANY_FILETYPES_PERL]->comment_close = NULL;
 	filetypes[GEANY_FILETYPES_PERL]->style_func_ptr = styleset_perl;


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.