[MacPerl] Glue::WebSTAR_301

[joshg@ola.bc.ca (Josh Gemmell)]

I've come across what may be an oddity in the glue modules. 


This is from WebSTAR_301.pm:
'send_partial'   => {'class' => 'WWW_', 'event' => 'SPar',
                'reply' => ['null', 1, 0, 0],'params' => {
                    '----' => [keyDirectObject(), 'char', 1, 0, 0, 0],
                    'connection' => ['Kcid', 'long', 1, 0, 0],
                    'more' => ['Kmor', 'bool', 1, 0, 0],
                }},

An this is from the pod documentation:
$obj->send_partial(char, {connection => long, more => bool})	
    Sends partial ACGI execution results to WebSTAR for transmission to
clients 


Running this code:
use Mac::Glue::WebSTAR_301;
$webstar = new Mac::Glue::WebSTAR_301;
$webstar->send_partial('some text', { connection => 2, more => 0 });

Results in Macperl error:
# Not enough parameters
File 'Dev:Pseudo'; Line 41

If I change the last line to:
$webstar->send_partial('some text', { more => 0 }, 0);

The WebSTAR log shows:
Error -1700: Send Partial Data (Reply Data could not be coerced to
requested type (char))
Error handling HighLevelEvent -1700

What gives?


***** Want to unsubscribe from this list?
***** Send mail with body "unsubscribe" to mac-perl-request@iis.ee.ethz.ch