?> ">[<?php echo _('Permanently Delete List'); ?> ]</a> <?php mail_footer(array()); } else { // // Show lists // $mlFactory = new MailingListFactory($Group); if (!$mlFactory || !is_object($mlFactory) || $mlFactory->isError()) { exit_error(_('Error'), $mlFactory->getErrorMessage()); } mail_header(array('title' => _('Mailing List Administration'))); $mlArray =& $mlFactory->getMailingLists(); if ($mlFactory->isError()) { echo '<p>' . _('Error') . ' ' . sprintf(_('Unable to get the list %s'), $Group->getPublicName()) . '</p>'; echo $mlFactory->getErrorMessage(); mail_footer(array()); exit; } echo '<p>' . sprintf(_('You can administrate lists from here. Please note that private lists can still be viewed by members of your project, but are not listed on %1$s.'), $GLOBALS['sys_name']) . '</p>'; echo '<ul> <li> <a href="' . getStringFromServer('PHP_SELF') . '?group_id=' . $group_id . '&add_list=1">' . _('Add Mailing List') . '</a> </li> </ul>'; $mlCount = count($mlArray); if ($mlCount > 0) {
$vRep = new Valid_WhiteList('reply', array('1')); $vRep->required(); if ($request->valid($vRep)) { $GLOBALS['Response']->addFeedback('warning', $GLOBALS['Language']->getText('plugin_forumml', 'warn_post_without_confirm')); } $params['title'] = util_get_group_name_from_id($group_id) . ' - ForumML - ' . $list_name; if ($topicSubject) { $params['title'] .= ' - ' . $topicSubject; } $params['group'] = $group_id; $params['toptab'] = 'mail'; $params['help'] = "CommunicationServices.html#MailingLists"; if ($request->valid(new Valid_Pv('pv'))) { $params['pv'] = $request->get('pv'); } mail_header($params); if ($request->valid($vSrep) && $request->valid($vTopic)) { if (isset($ret) && $ret) { // wait few seconds before redirecting to archives page echo "<script> setTimeout('window.location=\"/plugins/forumml/message.php?group_id=" . $group_id . "&list=" . $list_id . "&topic=" . $topic . "\"',3000) </script>"; } } $list_link = '<a href="/plugins/forumml/message.php?group_id=' . $group_id . '&list=' . $list_id . '">' . $list_name . '</a>'; $title = $GLOBALS['Language']->getText('plugin_forumml', 'title_root', array($list_link)); if ($topic) { $fmlMessageMgr = new ForumML_MessageManager(); $value = $fmlMessageMgr->getHeaderValue($topic, FORUMML_SUBJECT); if ($value) { $title = $value; } } else {
} $perm =& $Group->getPermission(session_get_user()); if (!$perm || !is_object($perm) || $perm->isError() || !$perm->isAdmin()) { exit_permission_denied(); } $ml = new MailingList($Group, getIntFromGet('group_list_id')); if (getStringFromPost('submit')) { $sure = getStringFromPost('sure'); $really_sure = getStringFromPost('really_sure'); if (!$ml->delete($sure, $really_sure)) { exit_error('Error', $ml->getErrorMessage()); } else { header("Location: index.php?group_id={$group_id}&feedback=DELETED"); } } mail_header(array('title' => _('Permanently Delete List'))); ?> <h3><?php echo $ml->getName(); ?> </h3> <p> <form method="post" action="<?php echo getStringFromServer('PHP_SELF'); ?> ?group_id=<?php echo $group_id; ?> &group_list_id=<?php echo $ml->getID(); ?>
<?php // // SourceForge: Breaking Down the Barriers to Open Source Development // Copyright 1999-2000 (c) The SourceForge Crew // http://sourceforge.net // // $Id: index.php,v 1.4 2004/01/13 13:15:24 helix Exp $ require 'pre.php'; require '../mail/mail_utils.php'; if ($group_id) { mail_header(array('title' => 'Mailing Lists for ' . group_getname($group_id))); if (user_isloggedin() && user_ismember($group_id)) { $public_flag = '0,1'; } else { $public_flag = '1'; } echo ' <H2>Mailing Lists for ' . group_getname($group_id) . '</H2>'; $sql = "SELECT * FROM mail_group_list WHERE group_id='{$group_id}' AND is_public IN ({$public_flag})"; $result = db_query($sql); $rows = db_numrows($result); if (!$result || $rows < 1) { echo ' <H1>No Lists found for ' . group_getname($group_id) . '</H1>'; echo ' <P>Project administrators use the admin link to request mailing lists.'; $HTML->footer(array()); exit; } echo "<P>Mailing lists provided via a " . $GLOBALS['sys_default_name'] . " version of " . "<A href=\"http://www.list.org\">GNU Mailman</A>. " . "Thanks to the Mailman and <A href=\"http://www.python.org\">Python</A> " . "crews for excellent software.";
require_once $gfcommon . 'mail/MailingListFactory.class.php'; $group_id = getIntFromGet('group_id'); if ($group_id) { $Group =& group_get_object($group_id); if (!$Group || !is_object($Group)) { exit_error(_('Error'), 'Could Not Get Group'); } elseif ($Group->isError()) { exit_no_group(); } $mlFactory = new MailingListFactory($Group); if (!$mlFactory || !is_object($mlFactory)) { exit_error(_('Error'), 'Could Not Get MailingListFactory'); } elseif ($mlFactory->isError()) { exit_error(_('Error'), $mlFactory->getErrorMessage()); } mail_header(array('title' => sprintf(_('Mailing Lists for %1$s'), $Group->getPublicName()))); $mlArray =& $mlFactory->getMailingLists(); if ($mlFactory->isError()) { echo '<h1>' . _('Error') . ' ' . sprintf(_('Unable to get the list %s'), $Group->getPublicName()) . '</h1>'; echo $mlFactory->getErrorMessage(); mail_footer(array()); exit; } $mlCount = count($mlArray); if ($mlCount == 0) { echo '<p>' . sprintf(_('No Lists found for %1$s'), $Group->getPublicName()) . '</p>'; echo '<p>' . _('Project administrators use the admin link to request mailing lists.') . '</p>'; mail_footer(array()); exit; } echo _('<p>Mailing lists provided via a GForge version of <a href="http://www.list.org/">GNU Mailman</a>. Thanks to the Mailman and <a href="http://www.python.org/">Python</a> crews for excellent software.</p>');