/[suikacvs]/messaging/manakai/bin/dis2pm.pl
Suika

Diff of /messaging/manakai/bin/dis2pm.pl

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

revision 1.1 by wakaba, Sun Oct 10 00:01:08 2004 UTC revision 1.2 by wakaba, Sun Oct 10 06:09:47 2004 UTC
# Line 1806  sub get_internal_code ($$;%) { Line 1806  sub get_internal_code ($$;%) {
1806      return perl_statement perl_exception      return perl_statement perl_exception
1807                    level => 'EXCEPTION',                    level => 'EXCEPTION',
1808                    class => 'DOMException',                    class => 'DOMException',
1809                    type => 'NOT_SUPPORTED_ERR',                    type => 'NOT_SUPPORTED_ERR',
1810                      subtype_uri
1811                   => ExpandedURI q<MDOM_EXCEPTION:MDOM_IMPL_METHOD_NOT_IMPLEMENTED>,
1812                    param => {                    param => {
1813                      ExpandedURI q<MDOM_EXCEPTION:if> => $Status->{IF},                      ExpandedURI q<MDOM_EXCEPTION:if> => $Status->{IF},
1814                      ExpandedURI q<MDOM_EXCEPTION:method> => $name,                      ExpandedURI q<MDOM_EXCEPTION:method> => $name,
# Line 2528  sub method2perl ($;%) { Line 2530  sub method2perl ($;%) {
2530                    level => 'EXCEPTION',                    level => 'EXCEPTION',
2531                    class => 'DOMException',                    class => 'DOMException',
2532                    type => 'NOT_SUPPORTED_ERR',                    type => 'NOT_SUPPORTED_ERR',
2533                      subtype_uri
2534                   => ExpandedURI q<MDOM_EXCEPTION:MDOM_IMPL_METHOD_NOT_IMPLEMENTED>,
2535                    param => {                    param => {
2536                      ExpandedURI q<MDOM_EXCEPTION:if> => $Status->{IF},                      ExpandedURI q<MDOM_EXCEPTION:if> => $Status->{IF},
2537                      ExpandedURI q<MDOM_EXCEPTION:method> => $Status->{Method},                      ExpandedURI q<MDOM_EXCEPTION:method> => $Status->{Method},
# Line 2812  sub attr2perl ($;%) { Line 2816  sub attr2perl ($;%) {
2816                    level => 'EXCEPTION',                    level => 'EXCEPTION',
2817                    class => 'DOMException',                    class => 'DOMException',
2818                    type => 'NOT_SUPPORTED_ERR',                    type => 'NOT_SUPPORTED_ERR',
2819                      subtype_uri
2820                    => ExpandedURI q<MDOM_EXCEPTION:MDOM_IMPL_ATTR_NOT_IMPLEMENTED>,
2821                    param => {                    param => {
2822                      ExpandedURI q<MDOM_EXCEPTION:if> => $Status->{IF},                      ExpandedURI q<MDOM_EXCEPTION:if> => $Status->{IF},
2823                      ExpandedURI q<MDOM_EXCEPTION:attr> => $Status->{Method},                      ExpandedURI q<MDOM_EXCEPTION:attr> => $Status->{Method},
# Line 2898  sub attr2perl ($;%) { Line 2904  sub attr2perl ($;%) {
2904                    level => 'EXCEPTION',                    level => 'EXCEPTION',
2905                    class => 'DOMException',                    class => 'DOMException',
2906                    type => 'NOT_SUPPORTED_ERR',                    type => 'NOT_SUPPORTED_ERR',
2907                      subtype_uri
2908                    => ExpandedURI q<MDOM_EXCEPTION:MDOM_IMPL_ATTR_NOT_IMPLEMENTED>,
2909                    param => {                    param => {
2910                      ExpandedURI q<MDOM_EXCEPTION:if> => $Status->{IF},                      ExpandedURI q<MDOM_EXCEPTION:if> => $Status->{IF},
2911                      ExpandedURI q<MDOM_EXCEPTION:attr> => $Status->{Method},                      ExpandedURI q<MDOM_EXCEPTION:attr> => $Status->{Method},
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
admin@suikawiki.org
 ViewVC Help
Powered by ViewVC 1.1.24