[comp.lang.perl] bugs in lib/syslog.pl

marc@athena.mit.edu (Marc Horowitz) (10/29/90)

Two problems:

1) comments missing from rcs log entries.  This might have been
reported, but I'm not sure.

2) not everyone's per lib is /usr/local/lib/perl.  There should be no
path at all, so that @INC is used to find syslog.ph.

		Marc

patch here:"

*** syslog.pl37	Mon Oct 29 02:40:46 1990
--- syslog.pl	Mon Oct 29 02:41:17 1990
***************
*** 2,10 ****
  # syslog.pl
  #
  # $Log:	syslog.pl,v $
! Revision 3.0.1.3  90/10/15  17:42:18  lwall
! patch29: various portability fixes
! 
  # Revision 3.0.1.1  90/08/09  03:57:17  lwall
  # patch19: Initial revision
  # 
--- 2,10 ----
  # syslog.pl
  #
  # $Log:	syslog.pl,v $
! # Revision 3.0.1.3  90/10/15  17:42:18  lwall
! # patch29: various portability fixes
! #
  # Revision 3.0.1.1  90/08/09  03:57:17  lwall
  # patch19: Initial revision
  # 
***************
*** 54,60 ****
  
  $host = 'localhost' unless $host;	# set $syslog'host to change
  
! require '/usr/local/lib/perl/syslog.ph';
  
  $maskpri = &LOG_UPTO(&LOG_DEBUG);
  
--- 54,60 ----
  
  $host = 'localhost' unless $host;	# set $syslog'host to change
  
! require 'syslog.ph';
  
  $maskpri = &LOG_UPTO(&LOG_DEBUG);