Changeset eede1bf

Timestamp:

Jul 27, 2009, 11:23:57 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:

776c4bb

Parents:

65b9a40

git-author:

Nelson Elhage <nelhage@mit.edu> (07/27/09 19:54:29)

git-committer:

Nelson Elhage <nelhage@mit.edu> (07/27/09 23:23:57)

Message:

Export owl_function_debugmsg to perl as BarnOwl::debug().

Files:

• perl/lib/BarnOwl.pm (modified) (2 diffs)
• perlglue.xs (modified) (1 diff)

perl/lib/BarnOwl.pm

@@ -11 +11 @@
                     start_question start_password start_edit_win
                     get_data_dir get_config_dir popless_text popless_ztext
-                    error
+                    error debug
                     create_style getnumcolors wordwrap
                     add_dispath remove_dispatch
@@ -143 +143 @@
 callback or hook called in perl code from BarnOwl, a C<die> will be
 caught and passed to C<error>.
+
+=head2 debug STRING
+
+Logs a debugging message to BarnOwl's debug log
 
 =head2 getnumcolors

perlglue.xs

@@ -263 +263 @@
         {
                 owl_function_error("%s", text);
+        }
+
+void
+debug(text)
+        char *text
+        CODE:
+        {
+                owl_function_debugmsg("%s", text);
         }