www/ecrire/exec/legender.php

   1 <?php
   2
   3 /***************************************************************************\
   4  *  SPIP, Systeme de publication pour l'internet                           *
   5  *                                                                         *
   6  *  Copyright (c) 2001-2014                                                *
   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 if (!defined('_ECRIRE_INC_VERSION')) return;
  14
  15 // http://doc.spip.org/@exec_legender_dist
  16 function exec_legender_dist()
  17 {
  18         exec_legender_args(intval(_request('id_document')),
  19                            _request('type'),
  20                            intval(_request('id')),
  21                            _request('ancre'),
  22                            _request('script'));
  23 }
  24
  25 // http://doc.spip.org/@exec_legender_args
  26 function exec_legender_args($id_document, $type, $id, $ancre='', $script='')
  27 {
  28         if (!$id_document OR !autoriser('joindredocument',$type, $id)) {
  29                 include_spip('inc/minipres');
  30                 echo minipres();
  31         } else {
  32                 include_spip('inc/actions');
  33                 $legender = charger_fonction('legender', 'inc');
  34                 ajax_retour($legender($id_document, array(), $script, $type, $id, $ancre));
  35         }
  36 }
  37 ?>