Attached a diff -u
to LPRngTool-1.2.3-1
which corrects it.
Eirik Thorsnes
On Sunday 30 September 2001 11:33, you wrote:
> Unless I do something strange, the bug is NOT completely fixed in the
> rpm binary at lprng.com.
> Whereas creating new entries (from blank printcap) works
> with hyphens, the parsing of printcaps with hyphens on startup or after the
> (new) generated printcap section is reread - do NOT work.
>
> My setup:
> RedHat 7.1 kernel 2.4.7 on intel
> LPRng: 3.7.8-1
> ifhp: 3.4.7-1
> LPRngTool: 1.2.3-1
>
> Eirik Thorsnes
>
> On Sunday 30 September 2001 02:46, you wrote:
> > > From [EMAIL PROTECTED] Thu Sep 27 02:09:14 2001
> > > From: Eirik Thorsnes <[EMAIL PROTECTED]>
> > > To: [EMAIL PROTECTED]
> > > Subject: LPRng: LPRngTool complains about hyphens (-) in printer names
> > > and comments Date: Thu, 27 Sep 2001 10:11:49 +0200
> > >
> > > Are hyphens not allowed in printer names, or is it a bug in LPRngTool?
> > > As it is, I'm not able to use LPRngTool until I remove all hyphens in
> > > the printcap, which will break all my clients. Is it a way around this?
> >
> > Bug in LPRngTool, fixed!
> >
> > > My setup:
> > > RedHat 7.1 kernel 2.4.7 on intel
> > > LPRng : 3.7.4-23
> > > IFHP: 3.4.4-1
> > > LPRngTool: 1.2.2-1
> > >
> > > -----------------------------------------------------------------------
> > >-- ---- YOU MUST BE A LIST MEMBER IN ORDER TO POST TO THE LPRNG MAILING
> > > LIST The address you post from MUST be your subscription address
> > >
> > > If you need help, send email to [EMAIL PROTECTED] (or lprng-requests
> > > or lprng-digest-requests) with the word 'help' in the body. For the
> > > impatient, to subscribe to a list with name LIST, send mail to
> > > [EMAIL PROTECTED] with: | example:
> > > subscribe LIST <mailaddr> | subscribe lprng-digest
> > > [EMAIL PROTECTED] unsubscribe LIST <mailaddr> | unsubscribe lprng
> > > [EMAIL PROTECTED]
> > >
> > > If you have major problems, send email to [EMAIL PROTECTED] with the
> > > word LPRNGLIST in the SUBJECT line.
> > > -----------------------------------------------------------------------
> > >-- ----
> >
> > -------------------------------------------------------------------------
> >-- -- YOU MUST BE A LIST MEMBER IN ORDER TO POST TO THE LPRNG MAILING LIST
> > The address you post from MUST be your subscription address
> >
> > If you need help, send email to [EMAIL PROTECTED] (or lprng-requests
> > or lprng-digest-requests) with the word 'help' in the body. For the
> > impatient, to subscribe to a list with name LIST, send mail to
> > [EMAIL PROTECTED] with: | example:
> > subscribe LIST <mailaddr> | subscribe lprng-digest [EMAIL PROTECTED]
> > unsubscribe LIST <mailaddr> | unsubscribe lprng [EMAIL PROTECTED]
> >
> > If you have major problems, send email to [EMAIL PROTECTED] with the
> > word LPRNGLIST in the SUBJECT line.
> > -------------------------------------------------------------------------
> >-- --
>
> ---------------------------------------------------------------------------
>-- YOU MUST BE A LIST MEMBER IN ORDER TO POST TO THE LPRNG MAILING LIST The
> address you post from MUST be your subscription address
>
> If you need help, send email to [EMAIL PROTECTED] (or lprng-requests
> or lprng-digest-requests) with the word 'help' in the body. For the
> impatient, to subscribe to a list with name LIST, send mail to
> [EMAIL PROTECTED] with: | example:
> subscribe LIST <mailaddr> | subscribe lprng-digest [EMAIL PROTECTED]
> unsubscribe LIST <mailaddr> | unsubscribe lprng [EMAIL PROTECTED]
>
> If you have major problems, send email to [EMAIL PROTECTED] with the
> word LPRNGLIST in the SUBJECT line.
> ---------------------------------------------------------------------------
>--
--- lprngtool.script.orig Sun Sep 30 02:54:21 2001
+++ lprngtool.script Sun Sep 30 13:31:31 2001
@@ -7156,12 +7156,12 @@
}
}
# now we check all printer names
- if { [regexp {[^A-Za-z0-9_.*|]} $name found ] } {
+ if { [regexp {[^-A-Za-z0-9_.*|]} $name found ] } {
set res [popup_yesno_dialog \
"Bad printer name or alias '$name' at character '$found', should I fix it?" \
0 $font_fixed]
if { $res == 0 } {
- regsub {[^A-Za-z_.*|]} $name "_" name
+ regsub {[^-A-Za-z_.*|]} $name "_" name
fixed 1
} else {
diemsg "Please fix up printcap manually and retry"
