Changeset 1399 for trunk/LATMOS-Accounts/bin/la-attributes

Timestamp:

08/26/15 16:48:16 (9 years ago)

Author:

nanardon

Message:

Fix: add an error message if otype is completly unsupported

File:

• trunk/LATMOS-Accounts/bin/la-attributes (modified) (2 diffs)

trunk/LATMOS-Accounts/bin/la-attributes

@@ -13 +13 @@
 =head1 SYNOPSIS
 
-List supported bases, synchronisations, objects and attributes
+List supported objects and attributes
 
     la-attributes [option]
@@ -66 +66 @@
     }
 
+    if (! keys %supported) {
+        die "No base support this object type $otype\n";
+    }
+
     my ($objlen) = sort { $b <=> $a } map { length($_) } keys %supported;
     $objlen+=1;