Changeset 7803326 for perlconfig.c

Timestamp:

Sep 30, 2011, 8:07:53 AM (14 years ago)

Author:

Jason Gross <jgross@mit.edu>

Branches:

master, release-1.10, release-1.9

Children:

0c71c58, 5f784ec, 923c3f6, a962f5c, d953ede

Parents:

e89ec48

git-author:

Jason Gross <jgross@mit.edu> (06/23/11 23:58:21)

git-committer:

Jason Gross <jgross@mit.edu> (09/30/11 08:07:53)

Message:

editwin callback for canceling the editwin

The code for editwin callbacks (called when the editwin is created) has
been extended so that callbacks are called when the editwin is canceled.
The old (perl) editwin callbacks still exist and have the same
functionality that they always have.  They are now deprecated.

File:

• perlconfig.c (modified) (2 diffs)

perlconfig.c

@@ -520 +520 @@
 }
 
-void owl_perlconfig_edit_callback(owl_editwin *e)
+void owl_perlconfig_edit_callback(owl_editwin *e, bool success)
 {
   SV *cb = owl_editwin_get_cbdata(e);
@@ -537 +537 @@
   PUSHMARK(SP);
   XPUSHs(sv_2mortal(text));
+  XPUSHs(sv_2mortal(newSViv(success)));
   PUTBACK;