diff options
Diffstat (limited to 'source4/build/pidl/Parse/Pidl/Util.pm')
| -rw-r--r-- | source4/build/pidl/Parse/Pidl/Util.pm | 12 |
1 files changed, 0 insertions, 12 deletions
diff --git a/source4/build/pidl/Parse/Pidl/Util.pm b/source4/build/pidl/Parse/Pidl/Util.pm index 8030a2c070..b98b7bca00 100644 --- a/source4/build/pidl/Parse/Pidl/Util.pm +++ b/source4/build/pidl/Parse/Pidl/Util.pm @@ -88,18 +88,6 @@ sub FileSave($$) } ##################################################################### -# return a filename with a changed extension -sub ChangeExtension($$) -{ - my($fname) = shift; - my($ext) = shift; - if ($fname =~ /^(.*)\.(.*?)$/) { - return "$1$ext"; - } - return "$fname$ext"; -} - -##################################################################### # a dumper wrapper to prevent dependence on the Data::Dumper module # unless we actually need it sub MyDumper($) |