Changeset d47d5fc
- Timestamp:
- Mar 4, 2007, 11:21:56 PM (18 years ago)
- Branches:
- master, barnowl_perlaim, debian, release-1.10, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9
- Children:
- e132a2d
- Parents:
- 65d3ef16
- git-author:
- Nelson Elhage <nelhage@mit.edu> (03/04/07 23:14:24)
- git-committer:
- Nelson Elhage <nelhage@mit.edu> (03/04/07 23:21:56)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
perl/modules/jabber.pl
r6e6ded7 rd47d5fc 1 1 # -*- mode: cperl; cperl-indent-level: 4; indent-tabs-mode: nil -*- 2 package BarnOwl::Jabber;3 2 use warnings; 4 3 use strict; 4 5 package BarnOwl::Jabber; 5 6 6 7 use Authen::SASL qw(Perl); … … 9 10 use Net::DNS; 10 11 use Getopt::Long; 12 13 BEGIN { 14 if(eval {require IO::Socket::SSL;}) { 15 if($IO::Socket::SSL::VERSION eq "0.97") { 16 BarnOwl::error("You are using IO::Socket:SSL 0.97, which \n" . 17 "contains bugs causing it not to work with barnowl's jabber.pl. We \n" . 18 "recommend updating to the latest IO::Socket::SSL from CPAN. \n"); 19 die("Not loading jabber.pl\n"); 20 } 21 } 22 } 11 23 12 24 no warnings 'redefine';
Note: See TracChangeset
for help on using the changeset viewer.