Changeset 9381782 for readconfig.c


Ignore:
Timestamp:
Jun 22, 2003, 1:33:09 AM (18 years ago)
Author:
James M. Kretchmar <kretch@mit.edu>
Branches:
master, barnowl_perlaim, debian, owl, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9
Children:
b2a91b6
Parents:
0c502e9
Message:
$owl::auth now works
File:
1 edited

Legend:

Unmodified
Added
Removed
  • readconfig.c

    r0c502e9 r9381782  
    170170  sv_setpv(perl_get_sv("owl::type", TRUE), owl_message_type_to_string(m));
    171171
     172
     173  /* set owl::auth default */
     174  sv_setpv(perl_get_sv("owl::auth", TRUE), "YES");
     175
    172176  /* set owl::direction */
    173177  if (owl_message_is_direction_in(m)) {
    174178    sv_setpv(perl_get_sv("owl::direction", TRUE), "in");
     179
     180    /* Change auth value for in messages */
     181    sv_setpv(perl_get_sv("owl::auth", TRUE), owl_zephyr_get_authstr(owl_message_get_notice(m)));
     182
    175183  } else if (owl_message_is_direction_out(m)) {
    176184    sv_setpv(perl_get_sv("owl::direction", TRUE), "out");
Note: See TracChangeset for help on using the changeset viewer.