Merge branch 'master' into ext-perl

[chaz/homebank] / src / hb-xml.c

diff --git a/src/hb-xml.c b/src/hb-xml.c
index c55db990e29686e604b2033b1dd9e39fcb0b280d..da67dad488e9b9a95a3c5b901d6140914e56736b 100644 (file)
--- a/src/hb-xml.c
+++ b/src/hb-xml.c
@@ -23,6 +23,8 @@
 #include "hb-transaction.h"
 #include "hb-xml.h"
 
+#include "ext.h"
+
 #include "ui-dialogs.h"
 
 /****************************************************************************/
@@ -877,6 +879,9 @@ gboolean rc;
 
        DB( g_print("\n[hb-xml] homebank_load_xml\n") );
 
+       GValue filename_val = G_VALUE_INIT;
+       ext_hook("load_file", EXT_STRING(&filename_val, filename), NULL);
+
        retval = XML_OK;
        if (!g_file_get_contents (filename, &buffer, &length, &error))
        {
@@ -1600,6 +1605,9 @@ gchar *outstr;
 gint retval = XML_OK;
 GError *error = NULL;
 
+       GValue filename_val = G_VALUE_INIT;
+       ext_hook("save_file", EXT_STRING(&filename_val, filename), NULL);
+
        io = g_io_channel_new_file(filename, "w", &error);
        if(io == NULL)
        {