Your message dated Thu, 7 May 2009 19:44:06 +0100
with message-id <200905071844.n47ii6is014...@kmos.homeip.net>
and subject line printop has been removed from Debian, closing #293649
has caused the Debian Bug report #293649,
regarding printop: Allowing some more configuration
to be marked as done.
This means that you claim that the problem has been dealt with.
If this is not the case it is now your responsibility to reopen the
Bug report if necessary, and/or fix the problem forthwith.
(NB: If you are a system administrator and have no idea what this
message is talking about, this may indicate a serious mail system
misconfiguration somewhere. Please contact ow...@bugs.debian.org
immediately.)
--
293649: http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=293649
Debian Bug Tracking System
Contact ow...@bugs.debian.org with problems
--- Begin Message ---
Package: printop
Version: 1.12-6
Severity: wishlist
Tags: patch
The attached patch makes the following changes:
new variable confLPCallname, to allow easier changing of
the name given to LPC after status. (When no local lprng
daemon is running, a...@remotehost, all works again).
new variable confQueueCommandButton, which when set to
0, disables the "Queue Command" button. (So no users
that cannot do so anywhere here get confused).
new option "set" for the configuration files, to set
these and other variables without having to change the
printop script itself.
As this is my first patch to a tcl/tk program, taking
a second look at it might be advisable.
Hochachtungsvoll,
Bernhard R. Link
--- /usr/bin/printop Thu Aug 30 15:51:48 2001
+++ printop Fri Feb 4 20:34:28 2005
@@ -11,6 +11,8 @@
global confLPC
global confLPQ
global confLPRM
+global confLPCallname
+global confQueueCommandButton
global listprinter
global interval
global show_all_queues
@@ -23,6 +25,13 @@
# set the default printer
set listprinter {lp}
+# set the name for getting all queues.
+# (try a...@remotehost, if no local daemon is running)
+set confLPCallname {all}
+
+# Show the Queue button to start/stop daemon,queues,...
+set confQueueCommandButton 1
+
# set the rescan interval (in msec) for "lpc status all"
set interval 60000; # 60000 = 1 minute
@@ -62,6 +71,7 @@
proc ShowWindow. {args} {# xf ignore me 7
global main_printer_menu_button
+ global confQueueCommandButton
# Window manager configurations
global tkVersion
@@ -206,6 +216,7 @@
# frame for menubutton for the queue-commands
frame .frame12.frame8.frame99 -borderwidth {2}
+ if { $confQueueCommandButton } {
menubutton .frame12.frame8.frame99.mbutton1 \
-menu {.frame12.frame8.frame99.mbutton1.menu} \
-text {Queue Commands} \
@@ -238,6 +249,7 @@
pack append .frame12.frame8.frame99 \
.frame12.frame8.frame99.mbutton1 \
{top frame center fillx expand}
+ }
# build widget .frame12.frame8.frame14
frame .frame12.frame8.frame14
@@ -459,6 +471,7 @@
# diese in den listboxen an
global confLPC
+global confLPCallname
global LPC-Status-Legend
global show_all_queues
@@ -474,7 +487,7 @@
# und nun lpc status einlesen
go_busy
-set inlist [split [eval "exec $confLPC status all"] "\n"]
+set inlist [split [eval "exec $confLPC status $confLPCallname"] "\n"]
go_ready
# for debugging: don't exec "lpc status all" but get saved output
# from other host
@@ -841,6 +854,7 @@
global queue_printer_menu_button
global move_printer_menu_button
global listprinter
+ global confQueueCommandButton
# Window manager configurations
global tkVersion
@@ -1149,6 +1163,7 @@
# frame for menubutton for the queue-commands
frame .printop.frame12.frame12.frame99 -borderwidth {2}
+ if { $confQueueCommandButton } {
menubutton .printop.frame12.frame12.frame99.mbutton1 \
-menu {.printop.frame12.frame12.frame99.mbutton1.menu} \
-text {Queue Commands} \
@@ -1181,6 +1196,7 @@
pack append .printop.frame12.frame12.frame99 \
.printop.frame12.frame12.frame99.mbutton1 \
{top frame center fillx expand}
+ }
# build widget .printop.frame12.frame12.label17
label .printop.frame12.frame12.label17 \
@@ -1355,10 +1371,11 @@
;# Drucker in die globale Liste printcap_list ein
global confLPC
+ global confLPCallname
;# erstmal ausgabe von "lpc status all" holen
go_busy
- set preprinterlist [split [eval "exec $confLPC status all"] "\n"]
+ set preprinterlist [split [eval "exec $confLPC status $confLPCallname"] "\n"]
go_ready
# delete headerline
set preprinterlist [lreplace $preprinterlist 0 0]
@@ -2116,6 +2133,7 @@
if {(($line!="") && ([string index $line 0]!="#"))} {
switch -exact -- [lindex $line 0] {
printer {
+ if { $type != "variables" } {
switch -exact -- [lindex $line 1] {
button {
set pattern [lindex $line 2]
@@ -2155,6 +2173,17 @@
parse_error $line $line_no "Error in 'printer'-command:"
$configfile
}
}
+ }
+ }
+ set {
+ if { $type == "variables" } {
+ if {([llength $line]!=3)} {
+ parse_error $line $line_no "Wrong number of arguments for set:"
$configfile
+ } else {
+ global [lindex $line 1]
+ set [lindex $line 1] [lindex $line 2]
+ }
+ }
}
default {
parse_error $line $line_no "Unknown command:" $configfile
@@ -2269,6 +2298,8 @@
global {mess_return}
set {mess_return} {}
+ build_printer_menu "variables" dummy
+
global {symbolicName}
set {symbolicName(LPCListbox)} {.frame2.frame0.frame1.frame3.listbox8}
@@ -2300,11 +2331,12 @@
catch "unset auto_execs"
-# startup source
-StartupSingleSrc
# initialize global variables
InitGlobals
+
+# startup source
+StartupSingleSrc
# display/remove toplevel windows.
ShowWindow.
--- End Message ---
--- Begin Message ---
Version: 1.12-8+rm
The printop package has been removed from Debian so we are closing
the bugs that were still opened against it.
For more information about this package's removal, read
http://bugs.debian.org/377924 . That bug might give the reasons why
this package was removed, and suggestions of possible replacements.
Don't hesitate to reply to this mail if you have any question.
Thank you for your contribution to Debian.
Kind regards,
--
Marco Rodrigues
--- End Message ---
