$OpenBSD: patch-cgi-bin_openwebmail_openwebmail-viewatt_pl,v 1.2 2003/04/14 08:26:20 kevlo Exp $ --- cgi-bin/openwebmail/openwebmail-viewatt.pl.orig Tue Nov 26 11:14:48 2002 +++ cgi-bin/openwebmail/openwebmail-viewatt.pl Thu Jan 30 14:45:07 2003 @@ -1,4 +1,4 @@ -#!/usr/bin/suidperl -T +#!/usr/bin/perl -T # # openwebmail-viewatt.pl - attachment reading program # @@ -5,7 +5,7 @@ use vars qw($SCRIPT_DIR); if ( $0 =~ m!^(.*?)/[\w\d\-\.]+\.pl! ) { $SCRIPT_DIR=$1; } -if (!$SCRIPT_DIR && open(F, '/etc/openwebmail_path.conf')) { +if (!$SCRIPT_DIR && open(F, '%%SYSCONFDIR%%/openwebmail/openwebmail_path.conf')) { $_=; close(F); if ( $_=~/^([^\s]*)/) { $SCRIPT_DIR=$1; } } if (!$SCRIPT_DIR) { print "Content-type: text/html\n\nSCRIPT_DIR not set in /etc/openwebmail_path.conf !\n"; exit 0; }