From 74946e19f79cf158c4c7e1ff4b95b253dce2fd2b Mon Sep 17 00:00:00 2001 From: timriker Date: Mon, 8 Nov 2004 22:54:02 +0000 Subject: [PATCH] copyright, show from git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk@1032 c11ca15a-4712-0410-83d8-924469b57eb5 --- blootbot/src/Modules/pager.pl | 14 ++++++++++++-- 1 file changed, 12 insertions(+), 2 deletions(-) diff --git a/blootbot/src/Modules/pager.pl b/blootbot/src/Modules/pager.pl index 56bc495..4176896 100644 --- a/blootbot/src/Modules/pager.pl +++ b/blootbot/src/Modules/pager.pl @@ -1,6 +1,16 @@ # Pager # -# modified from pager.pm in flooterbuck +# modified from pager.pm in flooterbuck changes are: +# +# Copyright (c) 2004 Tim Riker +# +# This package is free software; you can redistribute it and/or +# modify it under the terms of the license found in the file +# named LICENSE that should have accompanied this file. +# +# THIS PACKAGE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR +# IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED +# WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE. package pager; use strict; @@ -70,7 +80,7 @@ sub pager::page { if ($failed) { $retval='Sorry, an error occurred while sending mail.'; } else { - $retval="$from: I sent mail to $toaddr."; + $retval="$from: I sent mail to $toaddr from $fromaddr."; } } else { $retval="Sorry, I don't know ${to}'s email address."; -- 2.39.5