SF.net SVN: geany: [1288] branches/geany-0.10.1

eht16 at users.sourceforge.net eht16 at xxxxx
Thu Feb 15 19:39:22 UTC 2007


Revision: 1288
          http://svn.sourceforge.net/geany/?rev=1288&view=rev
Author:   eht16
Date:     2007-02-15 11:39:22 -0800 (Thu, 15 Feb 2007)

Log Message:
-----------
Added several missing style types for filetype Perl (thanks to John Gabriele for reporting).

Modified Paths:
--------------
    branches/geany-0.10.1/NEWS
    branches/geany-0.10.1/data/filetypes.perl
    branches/geany-0.10.1/src/highlighting.c

Modified: branches/geany-0.10.1/NEWS
===================================================================
--- branches/geany-0.10.1/NEWS	2007-02-15 14:17:53 UTC (rev 1287)
+++ branches/geany-0.10.1/NEWS	2007-02-15 19:39:22 UTC (rev 1288)
@@ -30,6 +30,8 @@
     * Improved the auto scrolling of documents and fixed a bug when
       opening files remotely.
     * Fixed wrong D function return type after a class definition.
+    * Added several missing style types for filetype Perl (thanks to
+      John Gabriele for reporting).
 
     Internationalisation:
     * New translations: fi (thanks to Harri Koskinen).

Modified: branches/geany-0.10.1/data/filetypes.perl
===================================================================
--- branches/geany-0.10.1/data/filetypes.perl	2007-02-15 14:17:53 UTC (rev 1287)
+++ branches/geany-0.10.1/data/filetypes.perl	2007-02-15 19:39:22 UTC (rev 1288)
@@ -18,6 +18,19 @@
 hash=0x105090;0xffffff;false;false
 symboltable=0x105090;0xffffff;false;false
 backticks=0x000000;0xe0c0e0;false;false
+pod_verbatim=0x004000;0xc0ffc0;false;false
+reg_subst=0x000000;0xf0e080;false;false
+datasection=0x600000;0xfff0d8;false;false
+here_delim=0x000000;0xddd0dd;false;false
+here_q=0x7f007f;0xddd0dd;false;false
+here_qq=0x7f007f;0xddd0dd;true;false
+here_qx=0x7f007f;0xddd0dd;false;true
+string_q=0x7f007f;0xffffff;false;false
+string_qq=0xff901e;0xffffff;false;false
+string_qx=0x000000;0xe0c0e0;false;false
+string_qr=0x105090;0xffffff;false;false
+string_qw=0x105090;0xffffff;false;false
+variable_indexer=0x000000;0xffffff;false;false
 
 [keywords]
 primary=NULL __FILE__ __LINE__ __PACKAGE__ __DATA__ __END__ AUTOLOAD BEGIN CORE DESTROY END EQ GE GT INIT LE LT NE CHECK abs accept alarm and atan2 bind binmode bless caller chdir chmod chomp chop chown chr chroot close closedir cmp connect continue cos crypt dbmclose dbmopen defined delete die do dump each else elsif endgrent endhostent endnetent endprotoent endpwent endservent eof eq eval exec exists exit exp fcntl fileno flock for foreach fork format formline ge getc getgrent getgrgid getgrnam gethostbyaddr gethostbyname gethostent getlogin getnetbyaddr getnetbyname getnetent getpeername getpgrp getppid getpriority getprotobyname getprotobynumber getprotoent getpwent getpwnam getpwuid getservbyname getservbyport getservent getsockname getsockopt glob gmtime goto grep gt hex if index int ioctl join keys kill last lc lcfirst le length link listen local localtime lock log lstat lt m map mkdir msgctl msgget msgrcv msgsnd my ne next no not oct open opendir or ord our pack package pipe pop pos print printf prototype push q qq qr quotemeta qu qw qx rand read readdir readline readlink readpipe recv redo ref rename require reset return reverse rewinddir rindex rmdir s scalar seek seekdir select semctl semget semop send setgrent sethostent setnetent setpgrp setpriority setprotoent setpwent setservent setsockopt shift shmctl shmget shmread shmwrite shutdown sin sleep socket socketpair sort splice split sprintf sqrt srand stat study sub substr symlink syscall sysopen sysread sysseek system syswrite tell telldir tie tied time times tr truncate uc ucfirst umask undef unless unlink unpack unshift untie until use utime values vec wait waitpid wantarray warn while write x xor y

Modified: branches/geany-0.10.1/src/highlighting.c
===================================================================
--- branches/geany-0.10.1/src/highlighting.c	2007-02-15 14:17:53 UTC (rev 1287)
+++ branches/geany-0.10.1/src/highlighting.c	2007-02-15 19:39:22 UTC (rev 1288)
@@ -1,7 +1,8 @@
 /*
  *      highlighting.c - this file is part of Geany, a fast and lightweight IDE
  *
- *      Copyright 2006 Enrico Troeger <enrico.troeger at uvena.de>
+ *      Copyright 2005-2007 Enrico Tröger <enrico.troeger at uvena.de>
+ *      Copyright 2006-2007 Nick Treleaven <nick.treleaven at btinternet.com>
  *
  *      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
@@ -1435,7 +1436,7 @@
 
 	load_keyfiles(config, config_home, GEANY_FILETYPES_PERL);
 
-	new_style_array(GEANY_FILETYPES_PERL, 17);
+	new_style_array(GEANY_FILETYPES_PERL, 30);
 	get_keyfile_hex(config, config_home, "styling", "default", "0x000000", "0xffffff", "false", &style_sets[GEANY_FILETYPES_PERL].styling[0]);
 	get_keyfile_hex(config, config_home, "styling", "error", "0xff0000", "0xffffff", "false", &style_sets[GEANY_FILETYPES_PERL].styling[1]);
 	get_keyfile_style(config, config_home, "commentline", &gsd_comment, &style_sets[GEANY_FILETYPES_PERL].styling[2]);
@@ -1453,6 +1454,19 @@
 	get_keyfile_hex(config, config_home, "styling", "hash", "0x105090", "0xffffff", "false", &style_sets[GEANY_FILETYPES_PERL].styling[14]);
 	get_keyfile_hex(config, config_home, "styling", "symboltable", "0x105090", "0xffffff", "false", &style_sets[GEANY_FILETYPES_PERL].styling[15]);
 	get_keyfile_hex(config, config_home, "styling", "backticks", "0x000000", "0xe0c0e0", "false", &style_sets[GEANY_FILETYPES_PERL].styling[16]);
+	get_keyfile_hex(config, config_home, "styling", "pod_verbatim", "0x004000", "0xc0ffc0", "false", &style_sets[GEANY_FILETYPES_PERL].styling[17]);
+	get_keyfile_hex(config, config_home, "styling", "reg_subst", "0x000000", "0xf0e080", "false", &style_sets[GEANY_FILETYPES_PERL].styling[18]);
+	get_keyfile_hex(config, config_home, "styling", "datasection", "0x600000", "0xfff0d8", "false", &style_sets[GEANY_FILETYPES_PERL].styling[19]);
+	get_keyfile_hex(config, config_home, "styling", "here_delim", "0x000000", "0xddd0dd", "false", &style_sets[GEANY_FILETYPES_PERL].styling[20]);
+	get_keyfile_hex(config, config_home, "styling", "here_q", "0x7f007f", "0xddd0dd", "false", &style_sets[GEANY_FILETYPES_PERL].styling[21]);
+	get_keyfile_hex(config, config_home, "styling", "here_qq", "0x7f007f", "0xddd0dd", "true", &style_sets[GEANY_FILETYPES_PERL].styling[22]);
+	get_keyfile_hex(config, config_home, "styling", "here_qx", "0x7f007f", "0xddd0dd", "true", &style_sets[GEANY_FILETYPES_PERL].styling[23]);
+	get_keyfile_hex(config, config_home, "styling", "string_q", "0x7f007f", "0xffffff", "false", &style_sets[GEANY_FILETYPES_PERL].styling[24]);
+	get_keyfile_hex(config, config_home, "styling", "string_qq", "0xff901e", "0xffffff", "false", &style_sets[GEANY_FILETYPES_PERL].styling[25]);
+	get_keyfile_hex(config, config_home, "styling", "string_qx", "0x000000", "0xe0c0e0", "false", &style_sets[GEANY_FILETYPES_PERL].styling[26]);
+	get_keyfile_hex(config, config_home, "styling", "string_qr", "0x105090", "0xffffff", "false", &style_sets[GEANY_FILETYPES_PERL].styling[27]);
+	get_keyfile_hex(config, config_home, "styling", "string_qw", "0x105090", "0xffffff", "false", &style_sets[GEANY_FILETYPES_PERL].styling[28]);
+	get_keyfile_hex(config, config_home, "styling", "variable_indexer", "0x000000", "0xffffff", "false", &style_sets[GEANY_FILETYPES_PERL].styling[29]);
 
 	style_sets[GEANY_FILETYPES_PERL].keywords = g_new(gchar*, 2);
 	get_keyfile_keywords(config, config_home, "keywords", "primary", GEANY_FILETYPES_PERL, 0, "\
@@ -1523,9 +1537,22 @@
 	set_sci_style(sci, SCE_PL_POD, GEANY_FILETYPES_PERL, 11);
 	set_sci_style(sci, SCE_PL_REGEX, GEANY_FILETYPES_PERL, 12);
 	set_sci_style(sci, SCE_PL_ARRAY, GEANY_FILETYPES_PERL, 13);
-	set_sci_style(sci, SCE_PL_BACKTICKS, GEANY_FILETYPES_PERL, 14);
-	set_sci_style(sci, SCE_PL_HASH, GEANY_FILETYPES_PERL, 15);
-	set_sci_style(sci, SCE_PL_SYMBOLTABLE, GEANY_FILETYPES_PERL, 16);
+	set_sci_style(sci, SCE_PL_HASH, GEANY_FILETYPES_PERL, 14);
+	set_sci_style(sci, SCE_PL_SYMBOLTABLE, GEANY_FILETYPES_PERL, 15);
+	set_sci_style(sci, SCE_PL_BACKTICKS, GEANY_FILETYPES_PERL, 16);
+	set_sci_style(sci, SCE_PL_POD_VERB, GEANY_FILETYPES_PERL, 17);
+	set_sci_style(sci, SCE_PL_REGSUBST, GEANY_FILETYPES_PERL, 18);
+	set_sci_style(sci, SCE_PL_DATASECTION, GEANY_FILETYPES_PERL, 19);
+	set_sci_style(sci, SCE_PL_HERE_DELIM, GEANY_FILETYPES_PERL, 20);
+	set_sci_style(sci, SCE_PL_HERE_Q, GEANY_FILETYPES_PERL, 21);
+	set_sci_style(sci, SCE_PL_HERE_QQ, GEANY_FILETYPES_PERL, 22);
+	set_sci_style(sci, SCE_PL_HERE_QX, GEANY_FILETYPES_PERL, 23);
+	set_sci_style(sci, SCE_PL_STRING_Q, GEANY_FILETYPES_PERL, 24);
+	set_sci_style(sci, SCE_PL_STRING_QQ, GEANY_FILETYPES_PERL, 25);
+	set_sci_style(sci, SCE_PL_STRING_QX, GEANY_FILETYPES_PERL, 26);
+	set_sci_style(sci, SCE_PL_STRING_QR, GEANY_FILETYPES_PERL, 27);
+	set_sci_style(sci, SCE_PL_STRING_QW, GEANY_FILETYPES_PERL, 28);
+	set_sci_style(sci, SCE_PL_VARIABLE_INDEXER, GEANY_FILETYPES_PERL, 29);
 }
 
 


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



More information about the Commits mailing list