Changeset d1ae4a4


Ignore:
Timestamp:
Jun 9, 2009, 12:35:37 PM (15 years ago)
Author:
Nelson Elhage <nelhage@mit.edu>
Branches:
master, release-1.10, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9
Children:
5550eb0
Parents:
ac40fdf
git-author:
Nelson Elhage <nelhage@mit.edu> (06/09/09 12:31:44)
git-committer:
Nelson Elhage <nelhage@mit.edu> (06/09/09 12:35:37)
Message:
Export a time_t for messages to perl as 'unix_time'

Previously, the only way for perl code to access the time was through the
'time' string, which code had to strptime() or otherwise parse in order
to render the time in a different format.
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • perl/lib/BarnOwl/Message.pm

    rfd8dfe7 rd1ae4a4  
    2222sub direction   { return shift->{"direction"}; }
    2323sub time        { return shift->{"time"}; }
     24sub unix_time   { return shift->{"unix_time"}; }
    2425sub id          { return shift->{"id"}; }
    2526sub body        { return shift->{"body"}; }
  • perlconfig.c

    rfd8dfe7 rd1ae4a4  
    8787  }
    8888  (void)hv_store(h, "time", strlen("time"), newSVpv(owl_message_get_timestr(m),0),0);
     89  (void)hv_store(h, "unix_time", strlen("unix_time"), newSViv(m->time), 0);
    8990  (void)hv_store(h, "id", strlen("id"), newSViv(owl_message_get_id(m)),0);
    9091  (void)hv_store(h, "deleted", strlen("deleted"), newSViv(owl_message_is_delete(m)),0);
Note: See TracChangeset for help on using the changeset viewer.