SF.net SVN: geany: [1335] trunk - Commits

25 Feb 2007

Revision: 1335
          http://svn.sourceforge.net/geany/?rev=1335&view=rev
Author:   eht16
Date:     2007-02-25 08:33:44 -0800 (Sun, 25 Feb 2007)
Log Message:
-----------
Added *.pod to Perl file patterns.
Modified Paths:
--------------
    trunk/ChangeLog
    trunk/data/filetype_extensions.conf
    trunk/src/filetypes.c
Modified: trunk/ChangeLog
===================================================================

--- trunk/ChangeLog	2007-02-25 14:26:55 UTC (rev 1334)
+++ trunk/ChangeLog	2007-02-25 16:33:44 UTC (rev 1335)
@@ -5,6 +5,8 @@
    src/tools.c, src/tools.h:
    Added custom commands to send selected text through some definable
    commands and replace the selection with the output.
+ * data/filetype_extensions.conf, src/filetypes.c:
+   Added *.pod to Perl file patterns.
2007-02-25  Nick Treleaven  nick.treleaven@btinternet.com
Modified: trunk/data/filetype_extensions.conf
===================================================================
--- trunk/data/filetype_extensions.conf	2007-02-25 14:26:55 UTC (rev 1334)
+++ trunk/data/filetype_extensions.conf	2007-02-25 16:33:44 UTC (rev 1335)
@@ -10,7 +10,7 @@
 ASM=*.asm;
 Fortran=*.f;*.for;*.ftn;*.f77;*.f90;*.f95;
 CAML=*.ml;*.mli;
-Perl=*.pl;*.perl;*.pm;*.agi;
+Perl=*.pl;*.perl;*.pm;*.agi;*.pod;
 PHP=*.php;*.php3;*.php4;*.php5;*.phtml;
 Javascript=*.js;
 Python=*.py;*.pyw;
Modified: trunk/src/filetypes.c
===================================================================
--- trunk/src/filetypes.c	2007-02-25 14:26:55 UTC (rev 1334)
+++ trunk/src/filetypes.c	2007-02-25 16:33:44 UTC (rev 1335)
@@ -309,12 +309,13 @@
    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*, 5);
+	filetypes[GEANY_FILETYPES_PERL]->pattern = g_new0(gchar*, 6);
    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] = g_strdup("*.agi");
-	filetypes[GEANY_FILETYPES_PERL]->pattern[4] = NULL;
+	filetypes[GEANY_FILETYPES_PERL]->pattern[4] = g_strdup("*.pod");
+	filetypes[GEANY_FILETYPES_PERL]->pattern[5] = 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.

    