Changeset 0c502e9 for readconfig.c

Timestamp:

Jun 22, 2003, 12:56:03 AM (21 years ago)

Author:

James M. Kretchmar <kretch@mit.edu>

Branches:

master, barnowl_perlaim, debian, owl, release-1.10, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9

Children:

9381782

Parents:

be0a79f

Message:

Added filter field 'login' which can take the values 'login'
   'logout' or 'none'
Added the perl variable $owl::login, just as above
Updated the 'login' and 'trash' filters appropriately
Fix for checking for DES
Bug fix in using makemsg when no curses window present

File:

• readconfig.c (modified) (2 diffs)

readconfig.c

@@ -86 +86 @@
   perl_get_sv("owl::time", TRUE);
   perl_get_sv("owl::host", TRUE);
+  perl_get_sv("owl::login", TRUE);
   perl_get_av("owl::fields", TRUE);
   
@@ -178 +179 @@
   } else {
     sv_setpv(perl_get_sv("owl::direction", TRUE), "unknown");
+  }
+
+  /* set owl::login */
+  if (owl_message_is_login(m)) {
+    sv_setpv(perl_get_sv("owl::login", TRUE), "login");
+  } else if (owl_message_is_logout(m)) {
+    sv_setpv(perl_get_sv("owl::login", TRUE), "logout");
+  } else {
+    sv_setpv(perl_get_sv("owl::login", TRUE), "none");
   }