Changeset 380b1ab for perl/modules/IRC

Timestamp:

Jan 9, 2008, 1:26:19 AM (17 years ago)

Author:

Nelson Elhage <nelhage@mit.edu>

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:

6286f26

Parents:

0e52069

git-author:

Nelson Elhage <nelhage@mit.edu> (01/09/08 01:23:14)

git-committer:

Nelson Elhage <nelhage@mit.edu> (01/09/08 01:26:19)

Message:

import is_private from ::Connection

File:

• perl/modules/IRC/lib/BarnOwl/Module/IRC.pm (modified) (2 diffs)

perl/modules/IRC/lib/BarnOwl/Module/IRC.pm

@@ -17 +17 @@
 use BarnOwl::Hooks;
 use BarnOwl::Message::IRC;
-use BarnOwl::Module::IRC::Connection;
+use BarnOwl::Module::IRC::Connection qw(is_private);
 
 use Net::IRC;
@@ -194 +194 @@
 }
 
-# Determines if the given message recipient is a username, as opposed to
-# a channel that starts with # or &.
-sub is_private {
-    return shift !~ /^[\#\&]/;
-}
-
 1;