View | Details | Raw Unified | Return to bug 34983
Collapse All | Expand All

(-)a/misc/translator/po2json (-2 / +1 lines)
Lines 165-171 sub main Link Here
165 
    }
 165 
    }
166 

          166
          

        

        

          167
          

          167
          

        

          
            

              168
              
    my $jsonobj = JSON->new;


              168
              
    my $jsonobj = JSON->new->canonical( $ENV{CANONICAL} // 1 );    # if you dont want sorted keys, export CANONICAL=0

            

        

          169
          
    my $basename = basename($src);

          169
          
    my $basename = basename($src);

        

        

          170
          
    $basename =~ s/\.pot?$//;

          170
          
    $basename =~ s/\.pot?$//;

        

        

          171
          
    if ($pretty)

          171
          
    if ($pretty)

        

            

              172
              
- 

              
              
            






  

  Return to bug 34983