[interchange-cvs] interchange - heins modified code/SystemTag/warnings.coretag

[interchange-core@icdevgroup.org]

User:      heins
Date:      2002-08-03 06:01:41 GMT
Modified:  code/SystemTag warnings.coretag
Log:
* Make argument calling proper for all situations (like calling with
  $Tag->warning($message) ).

Revision  Changes    Path
1.3       +1 -1      interchange/code/SystemTag/warnings.coretag


rev 1.3, prev_rev 1.2
Index: warnings.coretag
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
RCS file: /anon_cvs/repository/interchange/code/SystemTag/warnings.coretag,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- warnings.coretag	16 Feb 2002 09:39:08 -0000	1.2
+++ warnings.coretag	3 Aug 2002 06:01:41 -0000	1.3
@@ -7,7 +7,7 @@
=20
 	if($message) {
 		my $param =3D ref $opt->{param} ? $opt->{param} : [$opt->{param}];
-		push_warning($opt->{message}, @$param);
+		push_warning($message, @$param);
 		return unless $opt->{show};
 	}
=20