Changeset 39280 in spip-zone


Ignore:
Timestamp:
Jul 14, 2010, 6:14:32 PM (9 years ago)
Author:
fil@…
Message:

eviter de se faire spammer quand un article est chaud mais est deja en train de refroidir

File:
1 edited

Legend:

Unmodified
Added
Removed
  • _plugins_/chaud/inc/chaud.php

    r39256 r39280  
    1010function chaud_notifier() {
    1111        spip_log('notification', 'chaud');
    12         if ($a = chaud_articles(1.5)) {
    13                 spip_log(var_export($a, true), 'chaud');
    14                 $chauds = recuperer_fond('notification_chauds', array('chauds' => array_keys($a)));
    15                 if ($chauds) {
    16                         spip_log($chauds, 'chaud');
    17                         $envoyer_mail = charger_fonction('envoyer_mail','inc');
    18                         $envoyer_mail($GLOBALS['meta']['email_webmaster'],
    19                                 _L('Articles chauds'),
    20                                 $chauds
    21                         );
     12
     13        $old = (array) @unserialize($GLOBALS['meta']['chauds_articles']);
     14
     15        $a = chaud_articles(1.5);
     16       
     17        include_spip('inc/meta');
     18        ecrire_meta('chauds_articles', serialize($a));
     19
     20        if ($a) {
     21                $b = array();
     22                foreach ($a as $id => $v)
     23                        if ($v > $old[$id])
     24                                $b[] = $id;
     25
     26                if ($b) {
     27                        spip_log(var_export($a, true), 'chaud');
     28                        $chauds = recuperer_fond('notification_chauds', array('chauds' => $b));
     29                        if ($chauds) {
     30                                spip_log($chauds, 'chaud');
     31                                $envoyer_mail = charger_fonction('envoyer_mail','inc');
     32                                $envoyer_mail($GLOBALS['meta']['email_webmaster'],
     33                                        _L('Articles chauds'),
     34                                        $chauds
     35                                );
     36                        }
    2237                }
    2338        }
Note: See TracChangeset for help on using the changeset viewer.