squellete2
[aidenligne_francais_universite.git] / ecrire / action / redirect.php
CommitLineData
c495c100
P
1<?php
2
3/***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
5 * *
6 * Copyright (c) 2001-2007 *
7 * Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
8 * *
9 * Ce programme est un logiciel libre distribue sous licence GNU/GPL. *
10 * Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne. *
11\***************************************************************************/
12
13// pour rediriger vers l'URL canonique de l'article,
14// en indiquant recalcul et previsu
15
16if (!defined("_ECRIRE_INC_VERSION")) return;
17
18charger_generer_url();
19
20// http://doc.spip.org/@action_redirect_dist
21function action_redirect_dist()
22{
23 global $id_article, $id_auteur, $id_breve, $id_forum, $id_mot, $id_rubrique, $id_site, $id_syndic, $var_mode;
24
25
26 if ($id_article = intval($id_article)) {
27 $url = generer_url_article($id_article);
28}
29 else if ($id_breve = intval($id_breve)) {
30 $url = generer_url_breve($id_breve);
31}
32 else if ($id_forum = intval($id_forum)) {
33 $url = generer_url_forum($id_forum);
34}
35 else if ($id_rubrique = intval($id_rubrique)) {
36 $url = generer_url_rubrique($id_rubrique);
37}
38 else if ($id_mot = intval($id_mot)) {
39 $url = generer_url_mot($id_mot);
40}
41 else if ($id_auteur = intval($id_auteur)) {
42 $url = generer_url_auteur($id_auteur);
43}
44 else if ($id_syndic = intval($id_syndic) OR $id_syndic = intval($id_site)) {
45 $url = generer_url_site($id_syndic);
46}
47else {
48 $url = _DIR_RESTREINT_ABS;
49}
50
51// Ne pas masquer cette eventuelle erreur (aide a detecter des lignes vides
52// dans inc-urls ou mes_fonctions/mes_options)
53 header("Location: " . (!$var_mode ? $url : ($url . (strpos($url,'?') ? '&' : '?') ."var_mode=" . $var_mode)));
54}
55
56
57?>