aboutsummaryrefslogtreecommitdiffstats
path: root/phpBB/admin/admin_users.php
diff options
context:
space:
mode:
authorPaul S. Owen <psotfx@users.sourceforge.net>2001-08-26 14:35:39 +0000
committerPaul S. Owen <psotfx@users.sourceforge.net>2001-08-26 14:35:39 +0000
commite1fde13648731675037664d51f50e881f6844b38 (patch)
tree22a628447ed55ca43d9ee6c079b443d1d732a8e8 /phpBB/admin/admin_users.php
parent56a52d5c47f8f3254468404e680cd5bb4bf5347e (diff)
downloadforums-e1fde13648731675037664d51f50e881f6844b38.tar
forums-e1fde13648731675037664d51f50e881f6844b38.tar.gz
forums-e1fde13648731675037664d51f50e881f6844b38.tar.bz2
forums-e1fde13648731675037664d51f50e881f6844b38.tar.xz
forums-e1fde13648731675037664d51f50e881f6844b38.zip
Modified header comments
git-svn-id: file:///svn/phpbb/trunk@935 89ea8834-ac86-4346-8a33-228a782c2dd0
Diffstat (limited to 'phpBB/admin/admin_users.php')
-rw-r--r--phpBB/admin/admin_users.php25
1 files changed, 9 insertions, 16 deletions
diff --git a/phpBB/admin/admin_users.php b/phpBB/admin/admin_users.php
index 91f8f53a05..09b375a34b 100644
--- a/phpBB/admin/admin_users.php
+++ b/phpBB/admin/admin_users.php
@@ -11,17 +11,6 @@
*
***************************************************************************/
-
-/***************************************************************************
- *
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2 of the License, or
- * (at your option) any later version.
- *
- *
- ***************************************************************************/
-
if($setmodules == 1)
{
$filename = basename(__FILE__);
@@ -53,6 +42,10 @@ else if( $userdata['user_level'] != ADMIN )
{
message_die(GENERAL_MESSAGE, $lang['Not_admin']);
}
+
+//
+// Begin program
+//
if ( isset($HTTP_GET_VARS['submit']) ) {
//
// This looks familiar doesn't it? It's the user profile page! :)
@@ -120,8 +113,7 @@ if ( isset($HTTP_GET_VARS['submit']) ) {
$template->set_filenames(array(
- "body" => "admin/user_edit_body.tpl"
- )
+ "body" => "admin/user_edit_body.tpl")
);
$template->assign_vars(array(
@@ -304,7 +296,6 @@ else if($HTTP_POST_VARS[submit] && $HTTP_POST_VARS['user_id'])
$user_avatar_type = (!empty($HTTP_POST_FILES['avatar']['type'])) ? $HTTP_POST_FILES['avatar']['type'] : "";
$user_avatar = (empty($user_avatar_loc) && $mode == "editprofile") ? $userdata['user_avatar'] : "";
-
if(isset($HTTP_POST_VARS['submit']))
{
$error = FALSE;
@@ -660,6 +651,7 @@ else if($HTTP_POST_VARS[submit] && $HTTP_POST_VARS['user_id'])
{
$error = TRUE;
}
+
if( $error == TRUE )
{
message_die(GENERAL_ERROR, "Could not update user table", "", __LINE__, __FILE__, $sql);
@@ -691,7 +683,7 @@ else if($HTTP_POST_VARS[submit] && $HTTP_POST_VARS['user_id'])
}
else
{
- message_die(GENERAL_ERROR, $error_msg, "", __LINE__, __FILE__, "");
+ message_die(GENERAL_ERROR, $error_msg, "", __LINE__, __FILE__, "");
}
}
else
@@ -732,6 +724,7 @@ else
);
$template->pparse('body');
+ include('page_footer_admin.'.$phpEx);
}
-?>
+?> \ No newline at end of file
class="hl str">"}}; } else { my %options = (Passive => 1, Timeout => 60, Port => 21); $options{Firewall} = $ENV{PROXY} if $ENV{PROXY}; $options{Port} = $ENV{PROXYPORT} if $ENV{PROXYPORT}; unless ($login) { $login = 'anonymous'; $password = '-drakx@'; } my $ftp; foreach (1..10) { $ftp = Net::FTP->new(network::resolv($host), %options) or die; $ftp && $ftp->login($login, $password) and last; log::l("ftp login failed, sleeping before trying again"); sleep 5 * $_; } $ftp or die "unable to open ftp connection to $host"; $ftp->binary; $ftp->cwd($prefix); my @l = ($ftp, \ (my $retr = undef)); $hosts{"$host$prefix"} = \@l; @l; }}; wantarray ? @l : $l[0]; } sub getFile { my ($f, @para) = @_; $f eq 'XXX' and rewindGetFile(), return; #- special case to force closing connection. foreach (1..3) { my ($ftp, $retr) = new(@para ? @para : fromEnv); $$retr->close if $$retr; $$retr = $ftp->retr($f) and return $$retr; ($ftp->code == 550) and log::l("FTP: 550 file unavailable"), return; rewindGetFile(); log::l("ftp get failed, sleeping before trying again"); sleep 1; } } #-sub closeFiles() { #- #- close any existing connections #- foreach (values %hosts) { #- my $retr = $_->[1] if ref $_;