Changeset b363d83 for perlglue.xs

Timestamp:

Jul 8, 2007, 3:37:43 PM (17 years ago)

Author:

Nelson Elhage <nelhage@mit.edu>

Branches:

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

Children:

be98ba5

Parents:

93f65b6

Message:

Adding a -s switch to change the location of the config dir (~/.owl)

File:

• perlglue.xs (modified) (1 diff)

perlglue.xs

@@ -199 +199 @@
 get_data_dir ()
         CODE:
-                RETVAL = (char *) DATADIR;
+                RETVAL = (char *) owl_get_datadir();
         OUTPUT:
         RETVAL
+
+char * 
+get_config_dir ()
+        CODE:
+                RETVAL = (char *) owl_global_get_confdir(&g);
+        OUTPUT:
+        RETVAL  
 
 void