Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 00a6bdd7

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

  • ID 00a6bdd7580be1c0cd0bc72eafc9af911ae63ff9
  • Vorgänger 98bdc3f1
  • Nachfolger 2bceb436

scripts/console: utf8 Kompatibilität und Doku zu Term::ReadLine::Gnu

Unterschiede anzeigen:

SL/InstallationCheck.pm
82 82
@developer_modules = (
83 83
  { name => "DBIx::Log4perl",                      url => "http://search.cpan.org/~mjevans/", },
84 84
  { name => "Devel::REPL",                         url => "http://search.cpan.org/~doy/",       debian => 'libdevel-repl-perl' },
85
  { name => "Term::ReadLine::Gnu",                 url => "http://search.cpan.org/~hayashi/",   debian => 'libterm-readline-gnu-perl' },
85 86
  { name => "Log::Log4perl",                       url => "http://search.cpan.org/~mschilli/",  debian => 'liblog-log4perl-perl' },
86 87
  { name => "LWP::Simple",                         url => "http://search.cpan.org/~gaas/",      debian => 'libwww-perl', dist_name => 'libwww-perl' },
87 88
  { name => "Moose::Role",                         url => "http://search.cpan.org/~doy/",       debian => 'libmoose-perl' },
scripts/console
2 2

  
3 3
use warnings;
4 4
use strict;
5
use utf8;
6
use open qw(:std :utf8);
5 7
use 5.008;                          # too much magic in here to include perl 5.6
6 8

  
7 9
BEGIN {
......
64 66
my $repl = Devel::REPL->new;
65 67
$repl->load_plugin($_) for @plugins;
66 68
$repl->load_history($history_file);
69

  
70
binmode($repl->out_fh, 'utf8');
71

  
72
$repl->eval('use utf8;');
67 73
$repl->eval('help');
68 74
$repl->print("trying to auto login into client '$client' with login '$login'...\n");
69 75
execute_code($repl, "lxinit '$client', '$login'");

Auch abrufbar als: Unified diff