From a88e7b3d362cad5c461a5e868438a806152f50df Mon Sep 17 00:00:00 2001 From: Tzafrir Cohen Date: Mon, 17 May 2010 10:32:14 +0000 Subject: A more correct way to pass parameters Merged revisions 8630 via svnmerge from http://svn.digium.com/svn/dahdi/tools/trunk ........ git-svn-id: http://svn.asterisk.org/svn/dahdi/tools/branches/2.3@8631 a0bf4364-ded3-4de4-8d8a-66a801d63aff --- xpp/perl_modules/Dahdi/Hardware/USB.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/xpp/perl_modules/Dahdi/Hardware/USB.pm b/xpp/perl_modules/Dahdi/Hardware/USB.pm index d73bdbe..edc0f4c 100644 --- a/xpp/perl_modules/Dahdi/Hardware/USB.pm +++ b/xpp/perl_modules/Dahdi/Hardware/USB.pm @@ -123,7 +123,7 @@ sub _get_attr($) { } sub _get_attr_optional($$) { - my ($attr_file, $def_val) = $@; + my ($attr_file, $def_val) = @_; eval {return _get_attr($attr_file)}; -- cgit v1.2.3