X-Git-Url: http://Server1/repobrowser/?p=kiriwrite%2F.git;a=blobdiff_plain;f=cgi-files%2FModules%2FDatabase%2FSQLite.pm;h=28c7cba71febc787a5fea67363125b78b1b1e156;hp=31d0deeff1c511a51acb5716e95d428543a6e8b7;hb=9379933d4d112578e469053a691dfbb4873384f7;hpb=1553f195cb1ca50f1409afec52b29002e03b4511

diff --git a/cgi-files/Modules/Database/SQLite.pm b/cgi-files/Modules/Database/SQLite.pm
index 31d0dee..28c7cba 100644
--- a/cgi-files/Modules/Database/SQLite.pm
+++ b/cgi-files/Modules/Database/SQLite.pm
@@ -1184,6 +1184,8 @@ sub getpageinfo{
 # options	Specifies the following options in any order.			#
 #										#
 # PageFilename	Specifies the page filename to get the page information from.	#
+# Reduced	Specifies if the reduced version of the page information should #
+#		be retrieved.							#
 #################################################################################
 
 	$error = "";
@@ -1200,39 +1202,76 @@ sub getpageinfo{
 	# Get the page from the database.
 
 	my $page_filename	= $passedoptions->{"PageFilename"};
+	my $page_reduced	= $passedoptions->{"Reduced"};
 
-	$string_handle	= $database_handle->prepare('SELECT filename, pagename, pagedescription, pagesection, pagetemplate, pagedata, pagesettings, lastmodified FROM kiriwrite_database_pages WHERE filename = \'' . $class->convert($page_filename) . '\' LIMIT 1') or ( $error = "DatabaseError", $errorext = $database_handle->errstr, return );
-	$string_handle->execute();
+	if ($page_reduced eq 1){
 
-	# Check if the page exists in the database.
+		$string_handle	= $database_handle->prepare('SELECT filename, pagename, pagedescription, lastmodified FROM kiriwrite_database_pages WHERE filename = \'' . $class->convert($page_filename) . '\' LIMIT 1') or ( $error = "DatabaseError", $errorext = $database_handle->errstr, return );
 
-	while (@data_page = $string_handle->fetchrow_array()){
+		$string_handle->execute();
 
-		# Get the values from the array.
+		# Check if the page exists in the database.
 
-		$pagefilename 		= $data_page[0];
-		$pagename		= $data_page[1];
-		$pagedescription	= $data_page[2];
-		$pagesection		= $data_page[3];
-		$pagetemplate		= $data_page[4];
-		$pagedata		= $data_page[5];
-		$pagesettings		= $data_page[6];
-		$pagelastmodified	= $data_page[7];
+		while (@data_page = $string_handle->fetchrow_array()){
+	
+			# Get the values from the array.
+	
+			$pagefilename 		= $data_page[0];
+			$pagename		= $data_page[1];
+			$pagedescription	= $data_page[2];
+			$pagelastmodified	= $data_page[3];
+	
+			# Put the values into the page hash.
+	
+			%database_page = (
+				"PageFilename" 		=> $pagefilename,
+				"PageName"		=> $pagename,
+				"PageDescription"	=> $pagedescription,
+				"PageLastModified"	=> $class->dateconvert($pagelastmodified),
+			);
+	
+			$page_found = 1;
+	
+		}
 
-		# Put the values into the page hash.
 
-		%database_page = (
-			"PageFilename" 		=> $pagefilename,
-			"PageName"		=> $pagename,
-			"PageDescription"	=> $pagedescription,
-			"PageSection"		=> $pagesection,
-			"PageTemplate"		=> $pagetemplate,
-			"PageContent"		=> $pagedata,
-			"PageSettings"		=> $pagesettings,
-			"PageLastModified"	=> $class->dateconvert($pagelastmodified),
-		);
+	} else {
+		
+		$string_handle	= $database_handle->prepare('SELECT filename, pagename, pagedescription, pagesection, pagetemplate, pagedata, pagesettings, lastmodified FROM kiriwrite_database_pages WHERE filename = \'' . $class->convert($page_filename) . '\' LIMIT 1') or ( $error = "DatabaseError", $errorext = $database_handle->errstr, return );
 
-		$page_found = 1;
+		$string_handle->execute();
+
+		# Check if the page exists in the database.
+
+		while (@data_page = $string_handle->fetchrow_array()){
+	
+			# Get the values from the array.
+	
+			$pagefilename 		= $data_page[0];
+			$pagename		= $data_page[1];
+			$pagedescription	= $data_page[2];
+			$pagesection		= $data_page[3];
+			$pagetemplate		= $data_page[4];
+			$pagedata		= $data_page[5];
+			$pagesettings		= $data_page[6];
+			$pagelastmodified	= $data_page[7];
+	
+			# Put the values into the page hash.
+	
+			%database_page = (
+				"PageFilename" 		=> $pagefilename,
+				"PageName"		=> $pagename,
+				"PageDescription"	=> $pagedescription,
+				"PageSection"		=> $pagesection,
+				"PageTemplate"		=> $pagetemplate,
+				"PageContent"		=> $pagedata,
+				"PageSettings"		=> $pagesettings,
+				"PageLastModified"	=> $class->dateconvert($pagelastmodified),
+			);
+	
+			$page_found = 1;
+	
+		}
 
 	}
 	
@@ -2609,17 +2648,17 @@ sub addtemplate{
 
 		# Create a template table.
 
-	my $directory_permissions = main::kiriwrite_filepermissions(".", 1, 1, 0);
+		my $directory_permissions = main::kiriwrite_filepermissions(".", 1, 1, 0);
 
-	if ($directory_permissions eq 1){
+		if ($directory_permissions eq 1){
 
-		# The template database cannot be created because of invalid directory
-		# permissions so return an error.
+			# The template database cannot be created because of invalid directory
+			# permissions so return an error.
 
-		$error = "TemplateDatabaseFileUncreateable";
-		return;
+			$error = "TemplateDatabaseFileUncreateable";
+			return;
 
-	}
+		}
 
 		$template_string_handle = $template_database_handle->prepare('create table kiriwrite_templates(
 			filename varchar(256) primary key,