From dc203fc3b1ad6a974e61a89596a938d249def131 Mon Sep 17 00:00:00 2001
From: tof <>
Date: Sat, 29 Sep 2007 14:44:29 +0000
Subject: Make a testcase for Ticket #703

---
 .../protected/pages/Ticket703/Ticket703.page       | 13 +++++++++
 .../protected/pages/Ticket703/Ticket703.php        | 31 ++++++++++++++++++++++
 .../tickets/protected/pages/Ticket703/config.xml   | 15 +++++++++++
 3 files changed, 59 insertions(+)
 create mode 100644 tests/FunctionalTests/tickets/protected/pages/Ticket703/Ticket703.page
 create mode 100644 tests/FunctionalTests/tickets/protected/pages/Ticket703/Ticket703.php
 create mode 100644 tests/FunctionalTests/tickets/protected/pages/Ticket703/config.xml

(limited to 'tests/FunctionalTests/tickets/protected/pages')

diff --git a/tests/FunctionalTests/tickets/protected/pages/Ticket703/Ticket703.page b/tests/FunctionalTests/tickets/protected/pages/Ticket703/Ticket703.page
new file mode 100644
index 00000000..4ca02ef5
--- /dev/null
+++ b/tests/FunctionalTests/tickets/protected/pages/Ticket703/Ticket703.page
@@ -0,0 +1,13 @@
+<com:TContent id="Content">
+<p>
+Type some content which will be logged :
+<com:TActiveTextBox id="logMessage"/>
+<com:TActiveButton Text="Add to logfile" OnClick="addLog"/>
+</p>
+<p>
+<com:TActiveTextBox TextMode="MultiLine" id="logBox" ReadOnly="true" Rows="5" Columns="80"/>
+</pre>
+</p>
+<com:TActiveButton Text="Refresh" OnClick="refreshLog"/>
+<com:TActiveButton Text="Clear" OnClick="clearLog"/>
+</com:TContent>
\ No newline at end of file
diff --git a/tests/FunctionalTests/tickets/protected/pages/Ticket703/Ticket703.php b/tests/FunctionalTests/tickets/protected/pages/Ticket703/Ticket703.php
new file mode 100644
index 00000000..1b5b638a
--- /dev/null
+++ b/tests/FunctionalTests/tickets/protected/pages/Ticket703/Ticket703.php
@@ -0,0 +1,31 @@
+<?php
+
+class Ticket703 extends TPage {
+	public function onLoad ($param)
+	{
+		parent::onLoad($param);
+		if (!$this->isPostBack && !$this->isCallback)
+		{
+			$this->refreshLog();		
+		}
+	}
+	
+	public function refreshLog ()
+	{
+		$this->logBox->Text=file_get_contents(prado::getPathOfNameSpace('Ticket703.Logs.LogFile', '.txt'));
+	}
+	
+	public function clearLog ($sender, $param)
+	{
+		$file=prado::getPathOfNameSpace('Ticket703.Logs.LogFile', '.txt');
+		$f=fopen($file,"w");
+		fclose($f);
+		$this->refreshLog();
+	}
+	
+	public function addLog($sender,$param)
+	{
+		prado::log($this->logMessage->getText(), TLogger::DEBUG, "Tickets"); 
+	}
+}
+?>
\ No newline at end of file
diff --git a/tests/FunctionalTests/tickets/protected/pages/Ticket703/config.xml b/tests/FunctionalTests/tickets/protected/pages/Ticket703/config.xml
new file mode 100644
index 00000000..a9fd8721
--- /dev/null
+++ b/tests/FunctionalTests/tickets/protected/pages/Ticket703/config.xml
@@ -0,0 +1,15 @@
+<?xml version="1.0" encoding="utf-8"?>
+
+<configuration>
+  <paths>
+  	<using namespace="System.Util.*"/>
+  	<using namespace="System.Web.UI.ActiveControls.*"/>
+  	<alias id="Ticket703" path="."/>
+  </paths>
+  <modules>
+	<module id="Log" class="TLogRouter">
+		<route class="TFileLogRoute" MaxLogFiles="1" MaxFileSize="1" Levels="Debug" Categories="Tickets" LogPath="Ticket703.Logs" LogFile="LogFile.txt"/>
+	</module>
+  </modules>	
+
+</configuration>
\ No newline at end of file
-- 
cgit v1.2.3