]> CyberLeo.Net >> Repos - SourceForge/phpwiki.git/blob - lib/removepage.php
New constant in config.php 'HomePage' as _("HomePage"), to make it easier to rename...
[SourceForge/phpwiki.git] / lib / removepage.php
1 <?php
2 rcs_id('$Id: removepage.php,v 1.6 2002-01-24 00:45:28 dairiki Exp $');
3 require_once('lib/Template.php');
4
5 function RemovePage (&$request) {
6     global $Theme;
7     $pagename = $request->getArg('pagename');
8     $pagelink = $Theme->linkExistingWikiWord($pagename);
9     
10     if ($request->getArg('verify') != 'okay') {
11         $url = WikiURL($pagename, array('action' => 'remove', 'verify' => 'okay'));
12
13         $removeB = $Theme->makeButton(_("Remove the page now"), $url, 'wikiadmin');
14         $cancelB = $Theme->makeButton(_("Cancel"), WikiURL($pagename), 'wikiaction');
15         
16         $html[] = HTML::h2(fmt("You are about to remove '%s' permanently!", $pagelink));
17         $html[] =HTML::div(array('class' => 'toolbar'),
18                            $removeB,
19                            $Theme->getButtonSeparator(),
20                            $cancelB);
21     }
22     else {
23         $dbi = $request->getDbh();
24         $dbi->deletePage($pagename);
25         $html[] = HTML::h2(fmt("Removed page '%s' succesfully.", $pagename));
26     }
27
28     GeneratePage($html, _("Remove page"));
29 }
30
31 RemovePage($request);
32
33 // For emacs users
34 // Local Variables:
35 // mode: php
36 // tab-width: 8
37 // c-basic-offset: 4
38 // c-hanging-comment-ender-p: nil
39 // indent-tabs-mode: nil
40 // End:
41
42 ?>