From 8707f3c89bb38644c6a52c3037b127861a051f44 Mon Sep 17 00:00:00 2001
From: stu <stu@openbsd.org>
Date: Mon, 7 Nov 2011 03:06:48 +0000
Subject: [PATCH] Update to tcltutor-3.0b6.

Ok sebastia@.
---
 lang/tcltutor/Makefile                   |  7 +++----
 lang/tcltutor/distinfo                   | 10 +++++-----
 lang/tcltutor/patches/patch-TclTutor_tcl | 20 ++++++--------------
 3 files changed, 14 insertions(+), 23 deletions(-)

diff --git a/lang/tcltutor/Makefile b/lang/tcltutor/Makefile
index e6134cca3c4..1431b0d7166 100644
--- a/lang/tcltutor/Makefile
+++ b/lang/tcltutor/Makefile
@@ -1,9 +1,8 @@
-# $OpenBSD: Makefile,v 1.6 2011/01/05 17:12:23 stu Exp $
+# $OpenBSD: Makefile,v 1.7 2011/11/07 03:06:48 stu Exp $
 
 COMMENT =	learn Tcl interactively
 
-DISTNAME =	tcltutor-30b2
-REVISION =	2
+DISTNAME =	tcltutor-30b6
 CATEGORIES =	lang lang/tcl
 HOMEPAGE =	http://www.msen.com/~clif/TclTutor.html
 MAINTAINER =	Stuart Cassoff <stwo@users.sourceforge.net>
@@ -15,7 +14,7 @@ PERMIT_DISTFILES_CDROM =Yes
 PERMIT_DISTFILES_FTP =	Yes
 
 MASTER_SITES =	http://www.msen.com/~clif/
-DISTFILES =	tcltutor3_0b2.tgz
+DISTFILES =	tcltutor30b6.tgz
 MODULES =	x11/tk
 RUN_DEPENDS =	${MODTK_RUN_DEPENDS}
 NO_BUILD =	Yes
diff --git a/lang/tcltutor/distinfo b/lang/tcltutor/distinfo
index 281ca1b0b93..ec57c1d9cce 100644
--- a/lang/tcltutor/distinfo
+++ b/lang/tcltutor/distinfo
@@ -1,5 +1,5 @@
-MD5 (tcltutor3_0b2.tgz) = 0TRIJ9ZNiDQDN8OEoFcCrQ==
-RMD160 (tcltutor3_0b2.tgz) = 9o+4WN9YenuOrPhBJ6p/5F+fM/A=
-SHA1 (tcltutor3_0b2.tgz) = y6cLT1iSKafwbH2Zj+FXhVh1cqk=
-SHA256 (tcltutor3_0b2.tgz) = HQAjh+Q130tbOr+GR3SrcecM/TTpYy1qZ8IEohc7t5g=
-SIZE (tcltutor3_0b2.tgz) = 258440
+MD5 (tcltutor30b6.tgz) = Eyp6rinz7Yx0J9Zn1kceMQ==
+RMD160 (tcltutor30b6.tgz) = W6hsJP1CX2rEzzVPKiOmqqvkJxo=
+SHA1 (tcltutor30b6.tgz) = WQ0aiYAWYPYGCyHzt3bRFm+OS6A=
+SHA256 (tcltutor30b6.tgz) = MR/YUx9YQWB6vuiCPAtDkWYU1AOrtXvFP7bfhOLbgtw=
+SIZE (tcltutor30b6.tgz) = 263660
diff --git a/lang/tcltutor/patches/patch-TclTutor_tcl b/lang/tcltutor/patches/patch-TclTutor_tcl
index 80331a157b4..a92cefeb48e 100644
--- a/lang/tcltutor/patches/patch-TclTutor_tcl
+++ b/lang/tcltutor/patches/patch-TclTutor_tcl
@@ -1,6 +1,6 @@
-$OpenBSD: patch-TclTutor_tcl,v 1.3 2009/01/25 20:47:48 steven Exp $
---- TclTutor.tcl.orig	Sat Aug  2 05:04:40 2008
-+++ TclTutor.tcl	Sun Jan 25 21:42:14 2009
+$OpenBSD: patch-TclTutor_tcl,v 1.4 2011/11/07 03:06:48 stu Exp $
+--- TclTutor.tcl.orig	Sat Jan  8 08:35:46 2011
++++ TclTutor.tcl	Fri Nov  4 20:58:15 2011
 @@ -1,8 +1,8 @@
 -package provide app-tcltutor 1.0
  #!/bin/sh 
@@ -31,15 +31,7 @@ $OpenBSD: patch-TclTutor_tcl,v 1.3 2009/01/25 20:47:48 steven Exp $
  
  #
  #   check if a Scripted Document 
-@@ -654,7 +654,6 @@ proc createDisplay {} {
-     foreach l {lesson code output} {
-       set t [labelframe .$l -text [string totitle $l] -height [expr $h/4]]
-       .pn add $t
--      puts [.pn paneconfigure $t ]
-       set w [text $t.txt -yscrollcommand "$t.ysb set" ]
-       scrollbar $t.ysb -command "$w yview"
-       grid rowconfigure $t 0 -weight 1
-@@ -694,7 +693,7 @@ proc createDisplay {} {
+@@ -694,7 +694,7 @@ proc createDisplay {} {
          $mbf.file add command -label $l -command $l2
      }
      
@@ -48,7 +40,7 @@ $OpenBSD: patch-TclTutor_tcl,v 1.3 2009/01/25 20:47:48 steven Exp $
          if {$Tutor(logUsage)} {
             $mbf.file add command -label "Disable activity log" -command {set Tutor(logUsage) 0}
           } else {
-@@ -1134,6 +1133,7 @@ proc SetFontSize {} {
+@@ -1134,6 +1134,7 @@ proc SetFontSize {} {
  proc logUsage {str} {
      global Tutor
      
@@ -56,7 +48,7 @@ $OpenBSD: patch-TclTutor_tcl,v 1.3 2009/01/25 20:47:48 steven Exp $
      if {$Tutor(logUsage) == 0} {return}
  
      if {[string match $Tutor(logFile) ""]} {
-@@ -1160,6 +1160,7 @@ proc logUsage {str} {
+@@ -1160,6 +1161,7 @@ proc logUsage {str} {
  # 
  proc mailLog {} {
    global Tutor tcl_platform