Changeset 65


Ignore:
Timestamp:
05/04/09 03:39:20 (15 years ago)
Author:
nanardon
Message:
  • show all fields and allowed modes
File:
1 edited

Legend:

Unmodified
Added
Removed
  • LATMOS-Accounts/bin/la-config

    r40 r65  
    6363                $otype, 
    6464                $base ? $base : $LA->default_base_name; 
    65             print "  $_\n" foreach($labase->list_canonicals_fields($otype)); 
     65            printf( 
     66                "  %s (%s%s)\n", $_, 
     67                ($labase->get_field_name($otype, $_, 'r') ? 'r' : ' '), 
     68                ($labase->get_field_name($otype, $_, 'w') ? 'w' : ' '), 
     69            ) foreach($labase->list_canonicals_fields($otype, 'a')); 
    6670        } else { 
    6771            printf "Supported object type by base %s\n", 
Note: See TracChangeset for help on using the changeset viewer.