Re: [MacPerl] Mac::Glue

[Chris Nandor <pudge@pobox.com>]

At 9:20 -0500 1999.08.26, Jefferson R. Lowrey wrote:
>$filemaker->show($filemaker->obj('records' => whose(AND =>
>    ['cell' => 'Phone Ext.' => equals => '127'],
>    ['cell' => 'Type' => equals =>'Computer'])));

W00p!  That indeed does it!  I hope the syntax is not too cryptic once you
get it.  I asked for feedback on the syntax but never got much, so this is
what we have.  I think it is reasonable.


>This is obviously for one of my databases, but you should be able to easily
>change the constants to do what you want.  I was not able to get anything
>to work where I was doing something like
>$filemaker->show($filemaker->obj('records'=>'document'=>'Inventory'=>.....
>with anything after 'Inventory'.  It would complain that the class
>Inventory was not defined for the object.

Yes.  In this case, you have a class records whose value is document, and a
new class named inventory.  You can try records => of => document =>
"Inventory", but you might also do records => gAll => document =>
"Inventory", where gAll is a constant that asks for all of the class (in
this case, records).


>>And for Chris, I keep getting these lines when I run my script:
>>
>>--
>># Can't locate :auto:Mac:Glue:autosplit.ix in @INC.
>>File 'corinth:Developing:MacPerl Ÿ:site_perl:AutoLoader.pm'; Line 106
>>
>>File 'corinth:Developing:MacPerl Ÿ:lib:Mac:Glue.pm'; Line 13
>>--
>>
>>They don't seem to affect anything, but is there something I can do to
>>avoid them? They only occur when the script first loads. What's with the
>>blank error?
>
>I'd say you probably don't have glue installed properly, but that's just my
>guess.

Not sure myself ... if the prefs were set up right to have site_perl first
in @INC, then the install should work, though on older installers you
needed to run the installer twice.  In any event, site_perl had to be first
in @INC.

-- 
Chris Nandor          mailto:pudge@pobox.com         http://pudge.net/
%PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10  1FF77F13 8180B6B6'])

===== Want to unsubscribe from this list?
===== Send mail with body "unsubscribe" to macperl-request@macperl.org