Rev 11490: Change warning to pidl warning, fix uppercasing. in file:///home/jelmer/bzr.samba/SAMBA_4_0/

[Jelmer Vernooij]

At file:///home/jelmer/bzr.samba/SAMBA_4_0/

------------------------------------------------------------
revno: 11490
revision-id: jelmer at samba.org-20070216141029-nf84hlj2tr39ealw
parent: svn-v2:21381 at 0c0555d6-39d7-0310-84fc-f1cc0bd64818-branches%2fSAMBA_4_0
committer: Jelmer Vernooij <jelmer at samba.org>
branch nick: SAMBA_4_0
timestamp: Fri 2007-02-16 15:10:29 +0100
message:
  Change warning to pidl warning, fix uppercasing.
modified:
  source/pidl/lib/Parse/Pidl/Samba3/ClientNDR.pm svn-v2:15437 at 0c0555d6-39d7-0310-84fc-f1cc0bd64818-branches%2fSAMBA_4_0-source%2fpidl%2flib%2fParse%2fPidl%2fSamba3%2fClientNDR.pm
=== modified file 'source/pidl/lib/Parse/Pidl/Samba3/ClientNDR.pm'
--- a/source/pidl/lib/Parse/Pidl/Samba3/ClientNDR.pm	2007-02-14 14:23:59 +0000
+++ b/source/pidl/lib/Parse/Pidl/Samba3/ClientNDR.pm	2007-02-16 14:10:29 +0000
@@ -129,7 +129,7 @@
 	} elsif ($fn->{RETURN_TYPE} eq "WERROR") {
 		pidl "return werror_to_ntstatus(r.out.result);";
 	} else {
-		pidl "#warning Sorry, don't know how to convert $fn->{RETURN_TYPE} to NTSTATUS";
+		warning($fn->{ORIGINAL}, "Unable to convert $fn->{RETURN_TYPE} to NTSTATUS");
 		pidl "return NT_STATUS_OK;";
 	}
 
@@ -146,7 +146,7 @@
 
 	pidl_hdr "#ifndef __CLI_$uif\__";
 	pidl_hdr "#define __CLI_$uif\__";
-	ParseFunction($if->{NAME}, $_) foreach (@{$if->{FUNCTIONS}});
+	ParseFunction(uc($if->{NAME}), $_) foreach (@{$if->{FUNCTIONS}});
 	pidl_hdr "#endif /* __CLI_$uif\__ */";
 }