Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 87949627

Von Sven Schöling vor mehr als 8 Jahren hinzugefügt

  • ID 879496271a8c6004a12c49d0f057ff20db0607f3
  • Vorgänger 78c6fdee
  • Nachfolger 42bf1ae9

Keine Default Exporte mehr in den main:: space

Ich hoffe ich habe alle erwischt. Dieser Commit, macht folgendes:

Exports in den main:: space passieren immer, wenn ein bin/mozilla/
script ein Modul einbindet, das @EXPORT setzt.

Laut meiner ack/grep Magie sind das SL::MoreCommon und SL::Helper::Flash
gewesen.

In beiden Fällen waren das importe, wo die eigentlichen Funktionen
vorher im main:: space gelegen haben und dann nachträglich in ein Modul
verschoben wurden.

Ich habe also:

1. Im script selber die Exportliste exakt auf die Funktionen gesetzt die
das script selber benutzt, gefunden mit dem oneliner:

perl -MSL::Helper::Flash -nle 'my $re = join "|", \
       @SL::Helper::Flash::EXPORT; print $1 if /($re)/' bin/mozilla/dn.pl \
       | sort | uniq

Das waren in Flash: flash und in MoreCommon: save_form und restore_form.

2. Für den Fall, dass andere scripte im main:: Space diese Funktionen
benutzen alle anderen bin/mozilla Scripte nach diesen Funktionen
durchsucht, und für den Fall dass sie nicht selber ein require
b/m/common.pl machen die entsprechenden imports hinzugefügt.

Unterschiede anzeigen:

bin/mozilla/oe.pl
41 41 
use SL::OE;
42 42 
use SL::IR;
43 43 
use SL::IS;
44 
use SL::MoreCommon qw(ary_diff);
44 
use SL::MoreCommon qw(ary_diff restore_form save_form);
45 45 
use SL::PE;
46 46 
use SL::ReportGenerator;
47 47 
use List::MoreUtils qw(uniq any none);

Auch abrufbar als: Unified diff