/[papo]/papo/zot/zot.pm
ViewVC logotype

Diff of /papo/zot/zot.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.2 by jlenton, Thu Nov 7 20:59:16 2002 UTC revision 1.3 by jlenton, Fri May 16 16:52:21 2003 UTC
# Line 44  sub parse Line 44  sub parse
44                      if ($1 eq $_);                      if ($1 eq $_);
45              }              }
46          }          }
47          elsif (/^\s*(\w+)\s*(?:(..)\s*(\w+)|\((.*)\))?\s*$/) # anything else          elsif (/^\s*(\w+[\+\*]{0,2})\s*(?:(..)\s*(\w+)|\((.*)\))?\s*$/) # anything else
48          {          {
49              my ($field, $rel_type, $to_table, $datatype) = ($1, $2, $3, $4);              my ($field, $rel_type, $to_table, $datatype) = ($1, $2, $3, $4);
50              $field =~ s/^_/${prefix}_/;              $field =~ s/^_/${prefix}_/;

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26