use Perl

• Result (Score:2)

  by triv (2745) <reversethis-{gro.virt} {ta} {lrep.esu}> on 2006.07.06 15:26 (#48641) Homepage Journal

  ctriv@elendil:~/bin$ aedebug glue iCal '$x = $g->obj(event => gAny, calendar => gAny)->get; print $x->prop("summary")->get; my $t = $x->prop("start date")->get; print $t; print scalar localtime $t'
  AE2000 (8590): Sending an event:
  ------oo start of event oo------
  { 1 } 'aevt':  core/getd (i386){
            return id: 562954240 (0x218e0000)
       transaction id: 0 (0x0)
    interaction level: 64 (0x40)
       reply required: 1 (0x1)
               remote: 0 (0x0)
        for recording: 0 (0x0)
    target:
      { 1 } 'bund':  14 bytes {
        bundle id: com.apple.iCal
      }
    fEventSourcePSN: { 0x0,0x2 } (perl)
    optional attributes:
      < empty record >
    event data:
      { 1 } 'aevt':  - 1 items {
        key '----' -
          { 1 } 'obj ':  - 4 items {
            key 'form' -
              { 1 } 'enum':  4 bytes {
                'indx'
              }
            key 'want' -
              { 1 } 'type':  4 bytes {
                'wrev'
              }
            key 'seld' -
              { 1 } 'abso':  4 bytes {
                ' yna'
              }
            key 'from' -
              { 1 } 'obj ':  - 4 items {
                key 'form' -
                  { 1 } 'enum':  4 bytes {
                    'indx'
                  }
                key 'want' -
                  { 1 } 'type':  4 bytes {
                    'wres'
                  }
                key 'seld' -
                  { 1 } 'abso':  4 bytes {
                    ' yna'
                  }
                key 'from' -
                  { -1 } 'null':  null descriptor
              }
          }
      }
  }
  
  ------oo  end of event  oo------
  AE2000 (8590): Received an event reply:
  ------oo start of event oo------
  { 1 } 'aevt':  aevt/ansr (i386){
            return id: 562954240 (0x218e0000)
       transaction id: 0 (0x0)
    interaction level: 112 (0x70)
       reply required: 0 (0x0)
               remote: 0 (0x0)
        for recording: 0 (0x0)
    target:
      { 1 } 'psn ':  8 bytes {
        { 0x0, 0xa40001 } (iCal)
      }
    fEventSourcePSN: { 0x0,0xa40001 } (iCal)
    optional attributes:
      < empty record >
    event data:
      { 1 } 'aevt':  - 3 items {
        key 'errn' -
          { 1 } 'long':  4 bytes {
            -1700 (0xfffff95c)
          }
        key 'errt' -
          { 1 } 'type':  4 bytes {
            'obj '
          }
        key 'erob' -
          { 1 } 'obj ':  - 4 items {
            key 'form' -
              { 1 } 'enum':  4 bytes {
                'indx'
              }
            key 'want' -
              { 1 } 'type':  4 bytes {
                'wrev'
              }
            key 'seld' -
              { 1 } 'abso':  4 bytes {
                ' yna'
              }
            key 'from' -
              { 1 } 'obj ':  - 4 items {
                key 'form' -
                  { 1 } 'enum':  4 bytes {
                    'indx'
                  }
                key 'want' -
                  { 1 } 'type':  4 bytes {
                    'wres'
                  }
                key 'seld' -
                  { 1 } 'abso':  4 bytes {
                    ' yna'
                  }
                key 'from' -
                  { -1 } 'null':  null descriptor
              }
          }
      }
  }
  
  ------oo  end of event  oo------
  iCal->get(DOBJ, Mac::AEObjDesc=HASH(0x1b554fc)) event failed:
  errAECoercionFail (-1700)
  bad parameter data or unable to coerce the data supplied
  Can't call method "prop" on an undefined value at -e line 2, <DATA> line 1.
  

  --
  
  --
  "Cake or Death!" .... "Cake please"

  Reply to This

  • Re:Result (Score:2)

    by pudge (1)

    Thanks, I have fixes, and will update Mac-Carbon and Mac-AppleEvents-Simple soon.