show how to package own radius dictionary files
This commit is contained in:
		| @@ -233,7 +233,9 @@ sub match_with_radius { | ||||
|  | ||||
|   my $conf = setting('radius'); | ||||
|   my $radius = Authen::Radius->new(Host => $conf->{server}, Secret => $conf->{secret}); | ||||
|   Authen::Radius->load_dictionary(); | ||||
|   # my $dict_dir = Path::Class::Dir->new( dist_dir('App-Netdisco') ) | ||||
|   #   ->subdir('radius_dictionaries')->stringify; | ||||
|   Authen::Radius->load_dictionary(); # put $dict_dir in here once it's useful | ||||
|  | ||||
|   $radius->add_attributes( | ||||
|      { Name => 'User-Name',         Value => $user }, | ||||
|   | ||||
		Reference in New Issue
	
	Block a user