LEMONLDAP::NG : * Debian first install failed
* Doxygen documentation in progress => Version 0.9.3.2
This commit is contained in:
parent
bfab1a6e3b
commit
486666a611
|
@ -1,3 +1,9 @@
|
|||
lemonldap-ng (0.9.3.2) unstable; urgency=low
|
||||
|
||||
* Debian install failed (Closes: #510562, Closes: #510563 / bugs.debian.org)
|
||||
|
||||
-- Xavier Guimard <x.guimard@free.fr> Sat, 03 Jan 2009 09:47:21 +0100
|
||||
|
||||
lemonldap-ng (0.9.3.1) unstable; urgency=low
|
||||
|
||||
* Bug in Debian build
|
||||
|
|
|
@ -112,7 +112,7 @@ binary-indep: build install
|
|||
dh_installman
|
||||
dh_link
|
||||
dh_strip
|
||||
dh_compress
|
||||
dh_compress -X.pm -X.pl
|
||||
dh_fixperms
|
||||
# dh_perl
|
||||
# dh_makeshlibs
|
||||
|
|
|
@ -1,8 +1,16 @@
|
|||
## @file
|
||||
# Help messages used by the manager.
|
||||
|
||||
## @class
|
||||
# Import help messages subroutines in Lemonldap::NG::Manager in the wanted language.
|
||||
package Lemonldap::NG::Manager::Help;
|
||||
|
||||
use AutoLoader qw(AUTOLOAD);
|
||||
our $VERSION = '0.36';
|
||||
|
||||
## @fn void import(string lang)
|
||||
# Import help messages subroutines in Lemonldap::NG::Manager in the wanted language.
|
||||
# @param $lang Language string of "Accept-Language" HTTP header value
|
||||
sub import {
|
||||
my ($caller_package) = caller;
|
||||
my $lang = shift;
|
||||
|
|
|
@ -1,3 +1,8 @@
|
|||
## @file
|
||||
# Session explorer
|
||||
|
||||
## @class
|
||||
# Session explorer.
|
||||
package Lemonldap::NG::Manager::Sessions;
|
||||
|
||||
use strict;
|
||||
|
@ -8,11 +13,14 @@ our $VERSION = '0.1';
|
|||
|
||||
use base qw(Lemonldap::NG::Handler::CGI);
|
||||
|
||||
# Cleaner for Lemonldap::NG : removes old sessions from Apache::Session
|
||||
#
|
||||
# This module is written to be used by cron to clean old sessions from
|
||||
# Apache::Session.
|
||||
|
||||
## @cmethod Lemonldap::NG::Manager::Sessions new(hashRef args)
|
||||
# Constructor.
|
||||
# @param $args Arguments for Lemonldap::NG::Handler::CGI::new(). Must contains
|
||||
# 3 keys for Lemonldap::NG::Manager::Sessions:
|
||||
# - jqueryUri HTTP path to jquery.js
|
||||
# - personnalCss Optional HTTP path to custom CSS file
|
||||
# - imagePath HTTP path to the images directory
|
||||
# @return New Lemonldap::NG::Manager::Sessions object
|
||||
sub new {
|
||||
my ( $class, $args ) = @_;
|
||||
my $self = $class->SUPER::new($args)
|
||||
|
@ -27,6 +35,8 @@ sub new {
|
|||
return $self;
|
||||
}
|
||||
|
||||
## @rmethod void process()
|
||||
# Main method.
|
||||
sub process {
|
||||
my $self = shift;
|
||||
|
||||
|
@ -362,6 +372,10 @@ sub process {
|
|||
}
|
||||
}
|
||||
|
||||
## @rfn protected string htmlquote(string s)
|
||||
# Change <, > and & to HTML encoded values in the string
|
||||
# @param $s HTML string
|
||||
# @return HTML string
|
||||
sub htmlquote {
|
||||
my $s = shift;
|
||||
$s =~ s/</</g;
|
||||
|
@ -370,7 +384,8 @@ sub htmlquote {
|
|||
return $s;
|
||||
}
|
||||
|
||||
# HTML headers
|
||||
## @rfn protected void start()
|
||||
# Display HTTP and HTML headers.
|
||||
sub start {
|
||||
my $self = shift;
|
||||
print $self->header( -type => 'text/html; charset=utf8', );
|
||||
|
@ -428,14 +443,20 @@ sub start {
|
|||
);
|
||||
}
|
||||
|
||||
# Ajax node use by JQuery.simple.tree
|
||||
## @rfn protected void ajaxnode(string id, string text, string param)
|
||||
# Display tree node with Ajax functions inside for opening the node.
|
||||
# @param $id HTML id of the element.
|
||||
# @param $text text to display
|
||||
# @param $param Parameters for the Ajax query
|
||||
sub ajaxNode {
|
||||
my ( $self, $id, $text, $param ) = @_;
|
||||
print
|
||||
"<li id=\"$id\"><span>$text</span>\n<ul class=\"ajax\"><li id=\"sub_$id\">{url:$ENV{SCRIPT_NAME}?$param}</li></ul></li>\n";
|
||||
}
|
||||
|
||||
# Design of the main window
|
||||
## @rfn protected void window(string root)
|
||||
# Design the main window
|
||||
# @param $root Text to display in the root node of the tree
|
||||
sub window {
|
||||
my $self = shift;
|
||||
my $root = shift;
|
||||
|
@ -457,7 +478,8 @@ sub window {
|
|||
. '</span><ul>';
|
||||
}
|
||||
|
||||
# End of HTML
|
||||
## @rfn protected void end()
|
||||
# Display the end of HTML page.
|
||||
sub end {
|
||||
my $self = shift;
|
||||
print
|
||||
|
@ -467,6 +489,8 @@ sub end {
|
|||
|
||||
1;
|
||||
|
||||
## @rfn protected css()
|
||||
# Display the main CSS file (called by http://manager.example.com/sessions.pl/css)
|
||||
sub css {
|
||||
my $self = shift;
|
||||
print <<"EOF";
|
||||
|
@ -652,6 +676,8 @@ body
|
|||
EOF
|
||||
}
|
||||
|
||||
## @rfn protected js()
|
||||
# Display the main javascript file (called by http://manager.example.com/sessions.pl/js)
|
||||
sub js {
|
||||
my $self = shift;
|
||||
print <<"EOF";
|
||||
|
|
|
@ -1,3 +1,8 @@
|
|||
## @file
|
||||
# Messages translation for Lemonldap::NG::Manager
|
||||
|
||||
## @class
|
||||
# Messages translation for Lemonldap::NG::Manager.
|
||||
package Lemonldap::NG::Manager::_i18n;
|
||||
|
||||
# Developer warning : this file must be utf8 encoded
|
||||
|
@ -5,6 +10,8 @@ package Lemonldap::NG::Manager::_i18n;
|
|||
use AutoLoader qw(AUTOLOAD);
|
||||
our $VERSION = '0.33';
|
||||
|
||||
## @fn void import(string lang)
|
||||
# Import messages
|
||||
sub import {
|
||||
my ($caller_package) = caller;
|
||||
my $lang = pop;
|
||||
|
|
Loading…
Reference in New Issue