From 543336aef16562369c01992817f58e17144c9cad Mon Sep 17 00:00:00 2001
From: neoraider <devnull@localhost>
Date: Thu, 14 Dec 2006 00:06:02 +0000
Subject: Base-Type durch Subst-Erweiterungen unnoetig gemacht; Type-Konzept
 entfernt.

---
 pages/Pages:Copy.xml | 29 +++++++++++++++++++++++++++++
 1 file changed, 29 insertions(+)
 create mode 100644 pages/Pages:Copy.xml

(limited to 'pages/Pages:Copy.xml')

diff --git a/pages/Pages:Copy.xml b/pages/Pages:Copy.xml
new file mode 100644
index 0000000..cfec18c
--- /dev/null
+++ b/pages/Pages:Copy.xml
@@ -0,0 +1,29 @@
+<?xml version="1.0" encoding="UTF-8" ?>
+<page>
+  <info>
+    <name>Pages:Copy</name>
+    <template>phpexec</template>
+    <access>0:0</access>
+  </info>
+  <data>
+    <code>
+      <![CDATA[
+<?PHP
+  Uses('pages', 'links', 'util');
+  
+  if($_POST['back']) {
+    header('Location: ' . $GLOBALS['links']->GetNeonLink('Pages', null, false));
+    exit();
+  }
+  
+  if(!$_POST['name'] || !$_POST['newname']) exit();
+  
+  $GLOBALS['pages']->Copy(Unquote($_POST['name']), Unquote($_POST['newname']));
+  
+  header('Location: ' . $GLOBALS['links']->GetNeonLink('Pages', null, false));
+  exit();
+?>
+      ]]>
+    </code>
+  </data>
+</page>
-- 
cgit v1.2.3