Base-Type durch Subst-Erweiterungen unnoetig gemacht; Type-Konzept entfernt.

1 files changed, 41 insertions, 0 deletions

diff --git a/pages/Pages:Edit.xml b/pages/Pages:Edit.xml
new file mode 100644
index 0000000..e481258
--- /dev/null
+++ b/pages/Pages:Edit.xml
@@ -0,0 +1,41 @@
+<?xml version="1.0" encoding="UTF-8" ?>
+<page>
+  <info>
+    <name>Pages:Edit</name>
+    <template>phpexec</template>
+    <access>9:0</access>
+  </info>
+  <data>
+    <code>
+      <![CDATA[
+<?PHP
+  Uses('pages', 'links', 'util');
+  
+  
+  if($_POST['back']) {
+    header('Location: ' . Unquote($_POST['backlink']));
+    exit();
+  }
+  
+  if(!$_POST['name'] || !$_POST['backlink']) exit();
+  
+  if(!$GLOBALS['pages']->HasWriteAccess(Unquote($_POST['name'])))
+    exit();
+  
+  $data = array();
+  
+  foreach($_POST as $key => $val) {
+    if(substr($key, 0, 5) != 'data_') continue;
+    
+    $data[substr($key, 5)] = Unquote($val);
+  }
+  
+  $GLOBALS['pages']->Edit(Unquote($_POST['name']), $data);
+  
+  header('Location: ' . Unquote($_POST['backlink']));
+  exit();
+?>
+      ]]>
+    </code>
+  </data>
+</page>