Changeset 1758 for trunk/LATMOS-Accounts/lib/LATMOS/Accounts
- Timestamp:
- 05/04/16 10:34:27 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/objects.pm
r1752 r1758 742 742 # attr=foo => no extra white space ! 743 743 # \W is false, it is possible to have two char 744 my ($attr, $mode, $val) = $item =~ /^(\w+)(?:(\W )(.+))?$/ or next;744 my ($attr, $mode, $val) = $item =~ /^(\w+)(?:(\W+)(.+))?$/ or next; 745 745 if (!$mode) { 746 746 $mode = '~';
Note: See TracChangeset
for help on using the changeset viewer.