head	1.1;
branch	1.1.1;
access;
symbols
	pkgsrc-2026Q1:1.1.1.1.0.134
	pkgsrc-2026Q1-base:1.1.1.1
	pkgsrc-2025Q4:1.1.1.1.0.132
	pkgsrc-2025Q4-base:1.1.1.1
	pkgsrc-2025Q3:1.1.1.1.0.130
	pkgsrc-2025Q3-base:1.1.1.1
	pkgsrc-2025Q2:1.1.1.1.0.128
	pkgsrc-2025Q2-base:1.1.1.1
	pkgsrc-2025Q1:1.1.1.1.0.126
	pkgsrc-2025Q1-base:1.1.1.1
	pkgsrc-2024Q4:1.1.1.1.0.124
	pkgsrc-2024Q4-base:1.1.1.1
	pkgsrc-2024Q3:1.1.1.1.0.122
	pkgsrc-2024Q3-base:1.1.1.1
	pkgsrc-2024Q2:1.1.1.1.0.120
	pkgsrc-2024Q2-base:1.1.1.1
	pkgsrc-2024Q1:1.1.1.1.0.118
	pkgsrc-2024Q1-base:1.1.1.1
	pkgsrc-2023Q4:1.1.1.1.0.116
	pkgsrc-2023Q4-base:1.1.1.1
	pkgsrc-2023Q3:1.1.1.1.0.114
	pkgsrc-2023Q3-base:1.1.1.1
	pkgsrc-2023Q2:1.1.1.1.0.112
	pkgsrc-2023Q2-base:1.1.1.1
	pkgsrc-2023Q1:1.1.1.1.0.110
	pkgsrc-2023Q1-base:1.1.1.1
	pkgsrc-2022Q4:1.1.1.1.0.108
	pkgsrc-2022Q4-base:1.1.1.1
	pkgsrc-2022Q3:1.1.1.1.0.106
	pkgsrc-2022Q3-base:1.1.1.1
	pkgsrc-2022Q2:1.1.1.1.0.104
	pkgsrc-2022Q2-base:1.1.1.1
	pkgsrc-2022Q1:1.1.1.1.0.102
	pkgsrc-2022Q1-base:1.1.1.1
	pkgsrc-2021Q4:1.1.1.1.0.100
	pkgsrc-2021Q4-base:1.1.1.1
	pkgsrc-2021Q3:1.1.1.1.0.98
	pkgsrc-2021Q3-base:1.1.1.1
	pkgsrc-2021Q2:1.1.1.1.0.96
	pkgsrc-2021Q2-base:1.1.1.1
	pkgsrc-2021Q1:1.1.1.1.0.94
	pkgsrc-2021Q1-base:1.1.1.1
	pkgsrc-2020Q4:1.1.1.1.0.92
	pkgsrc-2020Q4-base:1.1.1.1
	pkgsrc-2020Q3:1.1.1.1.0.90
	pkgsrc-2020Q3-base:1.1.1.1
	pkgsrc-2020Q2:1.1.1.1.0.86
	pkgsrc-2020Q2-base:1.1.1.1
	pkgsrc-2020Q1:1.1.1.1.0.66
	pkgsrc-2020Q1-base:1.1.1.1
	pkgsrc-2019Q4:1.1.1.1.0.88
	pkgsrc-2019Q4-base:1.1.1.1
	pkgsrc-2019Q3:1.1.1.1.0.84
	pkgsrc-2019Q3-base:1.1.1.1
	pkgsrc-2019Q2:1.1.1.1.0.82
	pkgsrc-2019Q2-base:1.1.1.1
	pkgsrc-2019Q1:1.1.1.1.0.80
	pkgsrc-2019Q1-base:1.1.1.1
	pkgsrc-2018Q4:1.1.1.1.0.78
	pkgsrc-2018Q4-base:1.1.1.1
	pkgsrc-2018Q3:1.1.1.1.0.76
	pkgsrc-2018Q3-base:1.1.1.1
	pkgsrc-2018Q2:1.1.1.1.0.74
	pkgsrc-2018Q2-base:1.1.1.1
	pkgsrc-2018Q1:1.1.1.1.0.72
	pkgsrc-2018Q1-base:1.1.1.1
	pkgsrc-2017Q4:1.1.1.1.0.70
	pkgsrc-2017Q4-base:1.1.1.1
	pkgsrc-2017Q3:1.1.1.1.0.68
	pkgsrc-2017Q3-base:1.1.1.1
	pkgsrc-2017Q2:1.1.1.1.0.64
	pkgsrc-2017Q2-base:1.1.1.1
	pkgsrc-2017Q1:1.1.1.1.0.62
	pkgsrc-2017Q1-base:1.1.1.1
	pkgsrc-2016Q4:1.1.1.1.0.60
	pkgsrc-2016Q4-base:1.1.1.1
	pkgsrc-2016Q3:1.1.1.1.0.58
	pkgsrc-2016Q3-base:1.1.1.1
	pkgsrc-2016Q2:1.1.1.1.0.56
	pkgsrc-2016Q2-base:1.1.1.1
	pkgsrc-2016Q1:1.1.1.1.0.54
	pkgsrc-2016Q1-base:1.1.1.1
	pkgsrc-2015Q4:1.1.1.1.0.52
	pkgsrc-2015Q4-base:1.1.1.1
	pkgsrc-2015Q3:1.1.1.1.0.50
	pkgsrc-2015Q3-base:1.1.1.1
	pkgsrc-2015Q2:1.1.1.1.0.48
	pkgsrc-2015Q2-base:1.1.1.1
	pkgsrc-2015Q1:1.1.1.1.0.46
	pkgsrc-2015Q1-base:1.1.1.1
	pkgsrc-2014Q4:1.1.1.1.0.44
	pkgsrc-2014Q4-base:1.1.1.1
	pkgsrc-2014Q3:1.1.1.1.0.42
	pkgsrc-2014Q3-base:1.1.1.1
	pkgsrc-2014Q2:1.1.1.1.0.40
	pkgsrc-2014Q2-base:1.1.1.1
	pkgsrc-2014Q1:1.1.1.1.0.38
	pkgsrc-2014Q1-base:1.1.1.1
	pkgsrc-2013Q4:1.1.1.1.0.36
	pkgsrc-2013Q4-base:1.1.1.1
	pkgsrc-2013Q3:1.1.1.1.0.34
	pkgsrc-2013Q3-base:1.1.1.1
	pkgsrc-2013Q2:1.1.1.1.0.32
	pkgsrc-2013Q2-base:1.1.1.1
	pkgsrc-2013Q1:1.1.1.1.0.30
	pkgsrc-2013Q1-base:1.1.1.1
	pkgsrc-2012Q4:1.1.1.1.0.28
	pkgsrc-2012Q4-base:1.1.1.1
	pkgsrc-2012Q3:1.1.1.1.0.26
	pkgsrc-2012Q3-base:1.1.1.1
	pkgsrc-2012Q2:1.1.1.1.0.24
	pkgsrc-2012Q2-base:1.1.1.1
	pkgsrc-2012Q1:1.1.1.1.0.22
	pkgsrc-2012Q1-base:1.1.1.1
	pkgsrc-2011Q4:1.1.1.1.0.20
	pkgsrc-2011Q4-base:1.1.1.1
	pkgsrc-2011Q3:1.1.1.1.0.18
	pkgsrc-2011Q3-base:1.1.1.1
	pkgsrc-2011Q2:1.1.1.1.0.16
	pkgsrc-2011Q2-base:1.1.1.1
	pkgsrc-2011Q1:1.1.1.1.0.14
	pkgsrc-2011Q1-base:1.1.1.1
	pkgsrc-2010Q4:1.1.1.1.0.12
	pkgsrc-2010Q4-base:1.1.1.1
	pkgsrc-2010Q3:1.1.1.1.0.10
	pkgsrc-2010Q3-base:1.1.1.1
	pkgsrc-2010Q2:1.1.1.1.0.8
	pkgsrc-2010Q2-base:1.1.1.1
	pkgsrc-2010Q1:1.1.1.1.0.6
	pkgsrc-2010Q1-base:1.1.1.1
	pkgsrc-2009Q4:1.1.1.1.0.4
	pkgsrc-2009Q4-base:1.1.1.1
	pkgsrc-2009Q3:1.1.1.1.0.2
	pkgsrc-2009Q3-base:1.1.1.1
	pkgsrc-base:1.1.1.1
	TNF:1.1.1;
locks; strict;
comment	@# @;


1.1
date	2009.07.07.16.10.18;	author sborrill;	state Exp;
branches
	1.1.1.1;
next	;

1.1.1.1
date	2009.07.07.16.10.18;	author sborrill;	state Exp;
branches;
next	;


desc
@@



1.1
log
@Initial revision
@
text
@$NetBSD$
--- wbd.tcl.orig	1999-02-16 17:34:49.000000000 +0000
+++ wbd.tcl	2005-12-23 08:34:15.000000000 +0000
@@@@ -1,4 +1,3 @@@@
-#
 # Copyright (c) 1997 Loughborough University
 # All rights reserved.
 #
@@@@ -1294,6 +1293,7 @@@@
 
 proc StateWB {state} {
 
+	global W
 	if {$state == "0"} {set state normal}
 	if {$state == "1"} {set state disabled}
 
@@@@ -1314,8 +1314,10 @@@@
         $w2.font configure -state $state
 #       $w1.quit configure -state $state
         $w3.newpage configure -state $state
-        $w3.impps configure -state $state
-        $w3.imptext configure -state $state
+	if {$W(blockimport) == 0} {
+	        $w3.impps configure -state $state
+        	$w3.imptext configure -state $state
+        }
 #	$w3.dump configure -state $state
 #	$w3.load configure -state $state
 	$w3.grab configure -state $state
@@@@ -1635,20 +1637,21 @@@@
 
 proc BuildInfo {w} {
 
-	global GWbdFont
+	global GWbdFont W
 
 	button $w.newpage -width 8 -text {New Page} \
 		 -font $GWbdFont -command PageNew
 	pack $w.newpage -side left
 
-	button $w.impps -width 8 -text {Import PS} \
-		 -font $GWbdFont -command ImportPS
-	pack $w.impps -side left
-
-	button $w.imptext -width 8 -text {Import Text} \
-		 -font $GWbdFont -command ImportText
-	pack $w.imptext -side left
-
+	if {$W(blockimport) == 0} {
+		button $w.impps -width 8 -text {Import PS} \
+			 -font $GWbdFont -command ImportPS
+		pack $w.impps -side left
+	
+		button $w.imptext -width 8 -text {Import Text} \
+			 -font $GWbdFont -command ImportText
+		pack $w.imptext -side left
+	}
 #	button $w.ps -width 8 -text {Print} -command PrintWB \
 #		 -font $GWbdFont
 #	pack $w.ps -side left
@


1.1.1.1
log
@wbd, the UCB/LBNL whiteboard tool, is a real-time shared whiteboard
application.
@
text
@@