From cbf18a70c01f12ae47059c3de20dc5dc4a0922a6 Mon Sep 17 00:00:00 2001
From: elliott_c <ocielliottc@users.noreply.github.com>
Date: Thu, 11 Jan 2007 19:21:53 +0000
Subject: ChangeLogTag: Thu Jan 11 19:19:55 UTC 2007  Chad Elliott 
 <elliott_c@ociweb.com>

---
 generate_export_header.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'generate_export_header.pl')

diff --git a/generate_export_header.pl b/generate_export_header.pl
index e0fb1248..9c331112 100755
--- a/generate_export_header.pl
+++ b/generate_export_header.pl
@@ -112,7 +112,7 @@ elsif (index($name, '-') == 0) {
 }
 
 if (!defined $output) {
-  $output = $name . '_' . (substr($name, 0, 1) =~ /[A-Z]/ ? 'E' : 'e') .
+  $output = $name . '_' . ($name =~ /^[A-Z]/ ? 'E' : 'e') .
             'xport.h';
 }
 
-- 
cgit v1.2.1