Index: variable_dump.module
===================================================================
RCS file: /cvs/drupal-contrib/contributions/modules/variable_dump/variable_dump.module,v
retrieving revision 1.1
diff -u -p -r1.1 variable_dump.module
--- variable_dump.module	25 Aug 2009 12:57:17 -0000	1.1
+++ variable_dump.module	12 Oct 2009 19:18:19 -0000
@@ -56,10 +56,19 @@ function variable_dump_export_form(&$for
         ),
         '#description' => t('The type of search to perform.'),
       );
+      $form['format'] = array(
+        '#title' => t('Format'),
+        '#type' => 'radios',
+        '#options' => array(
+          'php' => t('PHP'), 
+          'patterns_xml' => t('Patterns xml') 
+        ),
+        '#description' => t('Select which format to use for export (PHP is default).'),
+      );
       break;
 
     case 2: // Display the export macro.
-      $form['export'] = variable_dump_export($form_state['values']['text'], $form_state['values']['operation']);
+      $form['export'] = variable_dump_export($form_state['values']['text'], $form_state['values']['operation'],$form_state['values']['format']);
       break;
   }
 
@@ -86,7 +95,7 @@ function variable_dump_export_form_submi
 /**
  * Export the settings.
  */
-function variable_dump_export($text = '', $type = 'starts_with') {
+function variable_dump_export($text = '', $type = 'starts_with', $format='php') {
   switch ($type) {
     case 'contains':
       $result = db_query("SELECT * FROM {variable} WHERE name LIKE('%$text%') ORDER BY name");
@@ -101,8 +110,17 @@ function variable_dump_export($text = ''
   $i = 1;
   while ($row = db_fetch_object($result)) {
     $value = unserialize($row->value);
-    $export .= 'variable_set('. $row->name .', '. var_export($value, true) .');';
-    $export .= "\n";
+    switch ($format) {
+    case 'php':
+      $export .= 'variable_set('. $row->name .', '. var_export($value, true) .');';
+      $export .= "\n";
+      break;
+    case 'patterns_xml':
+      $export .= '<variable name="'.$row->name . '">' . var_export($value, true) .'</variable>'; 
+      $export .= "\n";
+      break;
+    }
+    
     $i++;
   }
   $form = array(
@@ -167,4 +185,4 @@ function variable_dump_xss($text) {
   $text = filter_xss($text);
   $text = str_replace('=&gt;', '=>', $text);
   return $text;
-}
\ No newline at end of file
+}
