View | Details | Raw Unified
Collapse All | Expand All

(-) code2html (-2 / +3 lines)
 Lines 1-3    Link Here  
#!/usr/bin/perl -w
#!/usr/bin/perl -w
use locale;
 
#use encoding 'latin1';
 
my $vernr = "0.9.1";
my $vernr = "0.9.1";
my $monthshort = "Jan";
my $monthshort = "Jan";
 Lines 1899-1903    Link Here  

        

            

              

              
            

        
# taken from nedit
# taken from nedit

        
# modified by PP
# modified by PP

  

    

    

       Lines 1968-1972
       
    
  Link Here 
    

  

        
                                              {
                                              {

        
                                                'name'       => 'Identifiers',
                                                'name'       => 'Identifiers',

            

              
                                                'regex'      => '\\b[a-zA-Z][a-zA-Z0-9_]*\\b',

              
                                                'regex'      => '\\b[[:alpha:]](?:_?[^\W_])*\\b',

            

        
					        'style'      => 'identifier',
					        'style'      => 'identifier',

        
                                                'childregex' => []
                                                'childregex' => []