SL::DB::Part: displayable_name als Alias für long_description

Für einfachere Verwendung mit anderen Objekten wie ::Customer und
::Vendor.

diff --git a/SL/DB/Part.pm b/SL/DB/Part.pm
index 2a74b74..e4148ba 100644 (file)
--- a/SL/DB/Part.pm
+++ b/SL/DB/Part.pm
@@ -209,6 +209,8 @@ sub displayable_name {
   join ' ', grep $_, map $_[0]->$_, qw(partnumber description);
 }
 
+sub displayable_name { goto &long_description; }
+
 1;
 
 __END__