View | Details | Raw Unified | Return to bug 16637
Collapse All | Expand All

(-)a/C4/Installer/PerlDependencies.pm (+5 lines)
Lines 802-807 our $PERL_DEPS = { Link Here
802
        'required' => '1',
802
        'required' => '1',
803
        'min_ver'  => '0.14',
803
        'min_ver'  => '0.14',
804
    },
804
    },
805
    'Lingua::Ispell' => {
806
        'usage'    => 'Enhanced Content - Tagging',
807
        'required' => '0',
808
        'min_ver'  => '0.07'
809
    },
805
};
810
};
806
811
807
1;
812
1;
(-)a/C4/Tags.pm (-1 / +5 lines)
Lines 25-30 use Exporter; Link Here
25
25
26
use C4::Context;
26
use C4::Context;
27
use C4::Debug;
27
use C4::Debug;
28
use Module::Load::Conditional qw/check_install/;
28
#use Data::Dumper;
29
#use Data::Dumper;
29
use constant TAG_FIELDS => qw(tag_id borrowernumber biblionumber term language date_created);
30
use constant TAG_FIELDS => qw(tag_id borrowernumber biblionumber term language date_created);
30
use constant TAG_SELECT => "SELECT " . join(',', TAG_FIELDS) . "\n FROM   tags_all\n";
31
use constant TAG_SELECT => "SELECT " . join(',', TAG_FIELDS) . "\n FROM   tags_all\n";
Lines 50-55 BEGIN { Link Here
50
    );
51
    );
51
	# %EXPORT_TAGS = ();
52
	# %EXPORT_TAGS = ();
52
    my $ext_dict = C4::Context->preference('TagsExternalDictionary');
53
    my $ext_dict = C4::Context->preference('TagsExternalDictionary');
54
    if ( $ext_dict && ! check_install( module => 'Lingua::Ispell' ) ) {
55
        warn "Ignoring TagsExternalDictionary, because Lingua::Ispell is not installed.";
56
        $ext_dict = q{};
57
    }
53
	if ($debug) {
58
	if ($debug) {
54
		require Data::Dumper;
59
		require Data::Dumper;
55
		import Data::Dumper qw(:DEFAULT);
60
		import Data::Dumper qw(:DEFAULT);
56
- 

Return to bug 16637