Changeset 34793 in spip-zone for _acotes_


Ignore:
Timestamp:
Jan 30, 2010, 11:33:53 AM (9 years ago)
Author:
denisb@…
Message:

deuxième tentative avec les + qui remplacent les espaces pour la query-string

File:
1 edited

Legend:

Unmodified
Added
Removed
  • _acotes_/irc/Edgard.pl

    r34792 r34793  
    9191                        if ($text =~ /$lckey/)
    9292                        {
    93                                 if ($text =~ /^[@#\[](\d+\b|([a-z0-9_]{3,})(?=\(\)))/ || $text =~ /^@\?([^\?]+)\?/) # [commit, #ticket, @doc ou ?question
     93                                if ($text =~ /^[@#\[](\d+\b|([a-z0-9_]{3,})(?=\(\)))/) # [commit, #ticket ou @doc
    9494                                {
    9595                                        $conn->privmsg($channel, "hop $hash{$key}".$1); # var url
     96                                }
     97                                elsif ($text =~ /^@\?([^\?]+)\?/) # @?recherche
     98                                {
     99                                        $rec = "$1";
     100                                        $rec =~ s/\s/\+/g;
     101                                        $conn->privmsg($channel, "$hash{$key}".$rec); # var url
    96102                                }
    97103                                else
Note: See TracChangeset for help on using the changeset viewer.