Version 0.3.0

[kiriwrite/.git] / cgi-files / lib / page.lib

diff --git a/cgi-files/lib/page.lib b/cgi-files/lib/page.lib
index 36ab138..0848f9b 100644 (file)
--- a/cgi-files/lib/page.lib
+++ b/cgi-files/lib/page.lib
@@ -487,7 +487,7 @@ sub kiriwrite_page_list{
                my $tablestyletype      = 0;
                my $page_count          = 0;
                my $db_file_notblank    = 0;
-               my $page_split          = 50;
+               my $page_split          = $kiriwrite_config{"display_pagecount"};
                my $page_list           = 0;
                my $page_list_count     = 0;
 
@@ -609,11 +609,11 @@ sub kiriwrite_page_list{
 
                        if ($page_total_count eq $page_split){
 
-                               $page_list = substr(($page_total_count / $page_split), 0, 1);
+                               $page_list = int(($page_total_count / $page_split));
 
                        } else {
 
-                               $page_list = substr(($page_total_count / $page_split), 0, 1) + 1;
+                               $page_list = int(($page_total_count / $page_split) + 1);
 
                        }
 
@@ -1502,7 +1502,7 @@ sub kiriwrite_page_add{
                $kiriwrite_presmodule->addtext($kiriwrite_lang->{pages}->{pagecontent});
                $kiriwrite_presmodule->endcell();
                $kiriwrite_presmodule->addcell("tablecell2");
-               $kiriwrite_presmodule->addtextbox("pagecontent", { Columns => 50, Rows => 10 });
+               $kiriwrite_presmodule->addtextbox("pagecontent", { Columns => $kiriwrite_config{"display_textareacols"}, Rows => $kiriwrite_config{"display_textarearows"} });
                $kiriwrite_presmodule->addlinebreak();
                $kiriwrite_presmodule->addlinebreak();
                $kiriwrite_presmodule->startbox("datalist");
@@ -2469,7 +2469,7 @@ sub kiriwrite_page_edit{
                $kiriwrite_presmodule->addtext($kiriwrite_lang->{pages}->{pagename});
                $kiriwrite_presmodule->endcell();
                $kiriwrite_presmodule->addcell("tablecell2");
-               $kiriwrite_presmodule->addinputbox("pagename", { Size => 64, MaxLength => 256, Value => $data_name });
+               $kiriwrite_presmodule->addinputbox("pagename", { Size => 64, MaxLength => 512, Value => $data_name });
                $kiriwrite_presmodule->endcell();
                $kiriwrite_presmodule->endrow();
 
@@ -2478,7 +2478,7 @@ sub kiriwrite_page_edit{
                $kiriwrite_presmodule->addtext($kiriwrite_lang->{pages}->{pagedescription});
                $kiriwrite_presmodule->endcell();
                $kiriwrite_presmodule->addcell("tablecell2");
-               $kiriwrite_presmodule->addinputbox("pagedescription", { Size => 64, MaxLength => 256, Value => $data_description });
+               $kiriwrite_presmodule->addinputbox("pagedescription", { Size => 64, MaxLength => 512, Value => $data_description });
                $kiriwrite_presmodule->endcell();
                $kiriwrite_presmodule->endrow();
 
@@ -2577,7 +2577,7 @@ sub kiriwrite_page_edit{
                $kiriwrite_presmodule->addtext($kiriwrite_lang->{pages}->{pagecontent});
                $kiriwrite_presmodule->endcell();
                $kiriwrite_presmodule->addcell("tablecell2");
-               $kiriwrite_presmodule->addtextbox("pagecontent", { Columns => 50, Rows => 10, Value => $data_content });
+               $kiriwrite_presmodule->addtextbox("pagecontent", { Columns => $kiriwrite_config{"display_textareacols"}, Rows => $kiriwrite_config{"display_textarearows"},  Value => $data_content });
                $kiriwrite_presmodule->addlinebreak();
                $kiriwrite_presmodule->addlinebreak();
                $kiriwrite_presmodule->startbox("datalist");
@@ -3256,7 +3256,7 @@ sub kiriwrite_page_multimove{
 
                        # The database permissions are invalid so return an error.
 
-                       kiriwrite_error("databaseinvalidpermissions");
+                       kiriwrite_error("oldmovedatabasefileinvalidpermissions");
 
                }
 
@@ -3289,7 +3289,7 @@ sub kiriwrite_page_multimove{
 
                        # The database permissions are invalid so return an error.
 
-                       kiriwrite_error("databaseinvalidpermissions");
+                       kiriwrite_error("newmovedatabasefileinvalidpermissions");
 
                }
 
@@ -3945,7 +3945,7 @@ sub kiriwrite_page_multicopy{
 
                        # The database permissions are invalid so return an error.
 
-                       kiriwrite_error("databaseinvalidpermissions");
+                       kiriwrite_error("newcopydatabasefileinvalidpermissions");
 
                }