--- code2html 2006-05-13 03:17:35.000000000 +0200
+++ code2html.ada_identifiers_fixed 2006-05-14 12:19:23.000000000 +0200
@@ -1,3 +1,4 @@
#!/usr/bin/perl -w
+use locale;
my $vernr = "0.9.1";
my $monthshort = "Jan";
@@ -1326,4 +1327,5 @@
'
+
%%title%%
@@ -1474,4 +1476,5 @@
${ $STYLESHEET{'html-nobg'}} {'template'} = '
+
%%title%%
@@ -1494,4 +1497,5 @@
${ $STYLESHEET{'html-dark'}} {'template'} = '
+
%%title%%
@@ -1751,4 +1755,5 @@
${ $STYLESHEET{'html-simple'}} {'template'} = '
+
%%title%%
@@ -1774,4 +1779,5 @@
${ $STYLESHEET{'html-fntlck'}} {'template'} = '
+
%%title%%
@@ -1968,5 +1974,5 @@
{
'name' => 'Identifiers',
- 'regex' => '\\b[a-zA-Z][a-zA-Z0-9_]*\\b',
+ 'regex' => '\\b[[:alpha:]](?:_?[^\W_])*\\b',
'style' => 'identifier',
'childregex' => []