Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
Site
lqdn_ia
Commits
94fc5810
Commit
94fc5810
authored
May 15, 2015
by
Mindiell
Browse files
Converting to D7
parent
31ee168e
Changes
1
Hide whitespace changes
Inline
Side-by-side
lqdn_ia.module
View file @
94fc5810
...
...
@@ -4,7 +4,7 @@
/**
* Hook perm
*/
function
lqdn_ia_perm
()
{
function
lqdn_ia_perm
ission
()
{
return
array
(
"Access to LQDN administration page"
);
//Access to LQDN administration page
// Accéder à la page d'administration LQDN
}
...
...
@@ -24,11 +24,9 @@ function lqdn_ia_menu() {
}
/**
* Hook block
* Hook block
list alter
*/
function
lqdn_ia_block
(
$op
=
'list'
,
$delta
=
0
,
$edit
=
array
())
{
if
(
$op
==
'list'
)
{
$blocks
=
array
();
function
lqdn_ia_block_list_alter
(
&
$blocks
)
{
$blocks
[
0
]
=
array
(
'info'
=>
t
(
'Link to administration page'
),
//Lien vers la page d'administration
'cache'
=>
BLOCK_CACHE_GLOBAL
,
...
...
@@ -36,9 +34,13 @@ function lqdn_ia_block($op = 'list', $delta = 0, $edit = array()) {
'status'
=>
1
,
'region'
=>
'content_top'
,
);
return
$blocks
;
}
elseif
(
$op
==
'view'
AND
$delta
==
0
)
{
}
/**
* Hook block view
*/
function
lqdn_ia_block_view
(
$delta
=
''
)
{
if
(
$delta
==
''
)
{
$block
=
array
(
'subject'
=>
''
,
'content'
=>
'<p style="text-align:center;"><strong>'
.
l
(
t
(
'Site Administration'
),
'admin/lqdn'
)
.
'</strong></p>'
,
//Administration du site
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment