]> projects.mako.cc - scuttle/blob - tagdelete.php
trunk, branches/version-0.7:
[scuttle] / tagdelete.php
1 <?php
2 /***************************************************************************
3 Copyright (C) 2006 Scuttle project
4 http://sourceforge.net/projects/scuttle/
5 http://scuttle.org/
6
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version.
11
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15 GNU General Public License for more details.
16
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
20 ***************************************************************************/
21
22 require_once('header.inc.php');
23 $tagservice = & ServiceFactory :: getServiceInstance('TagService');
24 $templateservice = & ServiceFactory :: getServiceInstance('TemplateService');
25 $userservice = & ServiceFactory :: getServiceInstance('UserService');
26
27 list ($url, $tag) = explode('/', $_SERVER['PATH_INFO']);
28
29 if ($_POST['confirm']) {
30     if ($tagservice->deleteTag($tag)) {
31         $tplVars['msg'] = T_('Tag deleted');
32         $logged_on_user = $userservice->getCurrentUser();
33         header('Location: '. createURL('bookmarks', $logged_on_user[$userservice->getFieldName('username')]));
34     } else {
35         $tplVars['error'] = T_('Failed to delete the tag');
36         $templateservice->loadTemplate('error.500.tpl', $tplVars);
37         exit();
38     }
39 } elseif ($_POST['cancel']) {
40     $logged_on_user = $userservice->getCurrentUser();
41     header('Location: '. createURL('bookmarks', $logged_on_user[$userservice->getFieldName('username')] .'/'. $tags));
42 }
43
44 $tplVars['subtitle']    = T_('Delete Tag') .': '. $tag;
45 $tplVars['formaction']  = $_SERVER['SCRIPT_NAME'] .'/'. $tag;
46 $tplVars['referrer']    = $_SERVER['HTTP_REFERER'];
47 $templateservice->loadTemplate('tagdelete.tpl', $tplVars);
48 ?>

Benjamin Mako Hill || Want to submit a patch?