head	1.2;
access;
symbols
	RELEASE_6_1_0:1.1.1.1
	RELEASE_5_5_0:1.1.1.1
	RELEASE_6_0_0:1.1.1.1
	RELEASE_5_4_0:1.1.1.1
	RELEASE_4_11_0:1.1.1.1
	RELEASE_5_3_0:1.1.1.1
	RELEASE_4_10_0:1.1.1.1
	RELEASE_5_2_1:1.1.1.1
	RELEASE_5_2_0:1.1.1.1
	RELEASE_4_9_0:1.1.1.1
	RELEASE_5_1_0:1.1.1.1
	RELEASE_4_8_0:1.1.1.1
	RELEASE_5_0_0:1.1.1.1
	RELEASE_4_7_0:1.1.1.1
	RELEASE_4_6_2:1.1.1.1
	RELEASE_4_6_1:1.1.1.1
	RELEASE_4_6_0:1.1.1.1
	RELEASE_5_0_DP1:1.1.1.1
	RELEASE_4_5_0:1.1.1.1
	RELEASE_4_4_0:1.1.1.1
	RELEASE_4_3_0:1.1.1.1
	RELEASE_4_2_0:1.1.1.1
	RELEASE_4_1_1:1.1.1.1
	RELEASE_4_1_0:1.1.1.1
	RELEASE_3_5_0:1.1.1.1
	RELEASE_4_0_0:1.1.1.1
	RELEASE_3_4_0:1.1.1.1
	v0_3:1.1.1.1
	DANIELSULLY:1.1.1;
locks; strict;
comment	@# @;


1.2
date	2006.09.07.13.34.45;	author mat;	state dead;
branches;
next	1.1;

1.1
date	99.09.20.18.28.18;	author sheldonh;	state Exp;
branches
	1.1.1.1;
next	;

1.1.1.1
date	99.09.20.18.28.18;	author sheldonh;	state Exp;
branches;
next	;


desc
@@


1.2
log
@Update to 0.9
@
text
@--- AuthenRadius.pm.orig	Sun Aug  1 00:14:23 1999
+++ AuthenRadius.pm	Mon Sep 20 20:05:38 1999
@@@@ -37,7 +37,7 @@@@
 	my $timeout = $r->dir_config("Auth_Radius_timeout") || 5;
 
 	# Sanity for usernames and passwords.
-	if (length $user > 64 or $user =~ /[^A-Za-z0-9]/) {
+	if (length $user > 64 or $user =~ /[^A-Za-z0-9@@._-]/) {
 		$r->log_reason("Apache::AuthenRadius username too long or"
 			."contains illegal characters", $r->uri);
 		$r->note_basic_auth_failure;
@


1.1
log
@Initial revision
@
text
@@


1.1.1.1
log
@Import p5-Apache-Radius, a loadable mod_perl module which provides
RADIUS authentication capabilities to the Apache web server.
@
text
@@
