--- tklib-0.5.orig/debian/copyright
+++ tklib-0.5/debian/copyright
@@ -0,0 +1,74 @@
+This package was debianized by Sergei Golovan <sgolovan@nes.ru>
+from sources obtained from:
+http://sourceforge.net/project/showfiles.php?group_id=12883
+
+Copyright:
+
+This software is copyrighted by Ajuba Solutions and other parties.
+The following terms apply to all files associated with the software unless
+explicitly disclaimed in individual files.
+
+The authors hereby grant permission to use, copy, modify, distribute,
+and license this software and its documentation for any purpose, provided
+that existing copyright notices are retained in all copies and that this
+notice is included verbatim in any distributions. No written agreement,
+license, or royalty fee is required for any of the authorized uses.
+Modifications to this software may be copyrighted by their authors
+and need not follow the licensing terms described here, provided that
+the new terms are clearly indicated on the first page of each file where
+they apply.
+
+IN NO EVENT SHALL THE AUTHORS OR DISTRIBUTORS BE LIABLE TO ANY PARTY
+FOR DIRECT, INDIRECT, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL DAMAGES
+ARISING OUT OF THE USE OF THIS SOFTWARE, ITS DOCUMENTATION, OR ANY
+DERIVATIVES THEREOF, EVEN IF THE AUTHORS HAVE BEEN ADVISED OF THE
+POSSIBILITY OF SUCH DAMAGE.
+
+THE AUTHORS AND DISTRIBUTORS SPECIFICALLY DISCLAIM ANY WARRANTIES,
+INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY,
+FITNESS FOR A PARTICULAR PURPOSE, AND NON-INFRINGEMENT. THIS SOFTWARE
+IS PROVIDED ON AN "AS IS" BASIS, AND THE AUTHORS AND DISTRIBUTORS HAVE
+NO OBLIGATION TO PROVIDE MAINTENANCE, SUPPORT, UPDATES, ENHANCEMENTS, OR
+MODIFICATIONS.
+
+GOVERNMENT USE: If you are acquiring this software on behalf of the
+U.S. government, the Government shall have only "Restricted Rights"
+in the software and related documentation as defined in the Federal
+Acquisition Regulations (FARs) in Clause 52.227.19 (c) (2). If you
+are acquiring the software on behalf of the Department of Defense, the
+software shall be classified as "Commercial Computer Software" and the
+Government shall have only "Restricted Rights" as defined in Clause
+252.227-7013 (c) (1) of DFARs. Notwithstanding the foregoing, the
+authors grant the U.S. Government and others acting in its behalf
+permission to use and distribute the software in accordance with the
+terms specified in this license.
+
+Copyrights for individual modules:
+
+autoscroll: Copyright (c) 2003 Kevin B. Kenny <kennykb@users.sourceforge.net>
+chatwidget: Copyright (c) 2007 Pat Thoyts <patthoyts@users.sourceforge.net>
+ctext: Copyright (c) 2007 George Peter Staplin
+cursor: Copyright (c) 2001 Jeffrey Hobbs
+datefield: Copyright (c) 2002 Keith Vetter <keith@ebook.gemstar.com>
+diagrams: Copyright (c) 2006 Arjen Markus
+getstring: Copyright (c) 2005 Aaron Faupell <afaupell@users.sourceforge.net>
+history: Copyright (c) 2005 Aaron Faupell <afaupell@users.sourceforge.net>
+ico: Copyright (c) 2003-2004 ActiveState Corporation
+ Copyright (c) 2003-2007 Aaron Faupell
+ipentry: Copyright (c) 2003 Aaron Faupell <afaupell@users.sourceforge.net>
+khim: Copyright (c) 2005-2006 Kevin B. Kenny
+ Copyright (c) 2006 Andreas Kupries
+ Copyright (c) 2008 Emiliano Gavilan
+ntext: Copyright (c) 1992-1994 The Regents of the University of California
+ Copyright (c) 1994-1997 Sun Microsystems, Inc.
+ Copyright (c) 1998 Scriptics Corporation
+ Copyright (c) 2005-2007 additions by Keith Nash
+plotchart: Copyright (c) 2004-2008 Arjen Markus
+style: Copyright (c) 2004 ActiveState Corporation
+ Copyright (c) 2004 David N. Welton <davidw@dedasys.com>
+swaplist: Copyright (c) 2005 Aaron Faupell <afaupell@users.sourceforge.net>
+tablelist: Copyright (c) 2000-2008 Csaba Nemethi <csaba.nemethi@t-online.de>
+tkpiechart: Copyright (c) 2005-2006 Jean-Luc Fontaine <jfontain@free.fr>
+tooltip: Copyright (c) 2003 ActiveState Corporation.
+ Copyright (c) 1996-2007 Jeffrey Hobbs
+widget: Copyright (c) 2005 Jeffrey Hobbs
--- tklib-0.5.orig/debian/watch
+++ tklib-0.5/debian/watch
@@ -0,0 +1,6 @@
+# Watch control file for uscan
+
+# Compulsory line, this is a version 3 file
+version=3
+
+http://sf.net/tcllib/tklib-([\d.]*).tar.gz
--- tklib-0.5.orig/debian/postinst
+++ tklib-0.5/debian/postinst
@@ -0,0 +1,38 @@
+#!/bin/sh
+# postinst script for tklib
+#
+# see: dh_installdeb(1)
+
+set -e
+
+# summary of how this script can be called:
+# * <postinst> configure <most-recently-configured-version>
+# * <old-postinst> abort-upgrade <new-version>
+# * <conflictor's-postinst> abort-remove in-favour <package> <new-version>
+# * <postinst> abort-remove
+# * <deconfigured's-postinst> abort-deconfigure in-favour <failed-install-package> <version> \
+# removing <conflicting-package> <version>
+#
+# for details, see /usr/doc/packaging-manual/
+
+case "$1" in
+ configure|abort-remove|abort-upgrade|abort-deconfigure)
+ if [ -d /usr/lib/tklib0.4 -a ! -h /usr/lib/tklib0.4 ] ; then
+ # It's better to fail than to loose user's data
+ rmdir /usr/lib/tklib0.4
+ ln -s ../share/tklib0.4 /usr/lib/tklib0.4
+ fi
+ ;;
+ *)
+ echo "postinst called with unknown argument \`$1'" >&2
+ exit 0
+ ;;
+esac
+
+# dh_installdeb will replace this with shell code automatically
+# generated by other debhelper scripts.
+
+#DEBHELPER#
+
+exit 0
+
--- tklib-0.5.orig/debian/docs
+++ tklib-0.5/debian/docs
@@ -0,0 +1,4 @@
+PACKAGES
+README
+README-0.4.txt
+doc/html
--- tklib-0.5.orig/debian/compat
+++ tklib-0.5/debian/compat
@@ -0,0 +1 @@
+5
--- tklib-0.5.orig/debian/changelog
+++ tklib-0.5/debian/changelog
@@ -0,0 +1,117 @@
+tklib (0.5-3) unstable; urgency=low
+
+ * Fixed demo which shows a tile-based world map using openstreetmap.
+ * Added ${misc:Depends} substvar because the package uses debhelper.
+ * Bumped the standards version to 3.9.2.
+ * Added the README.source which describes how to apply the series of
+ patches in debian/patches subdir.
+ * Added build-arch and build-indep targets into debian/rules.
+
+ -- Sergei Golovan <sgolovan@debian.org> Sun, 18 Dec 2011 22:28:10 +0400
+
+tklib (0.5-2) unstable; urgency=low
+
+ * Added tcllib in recommended dependencies because some modules (widget)
+ don't work without modules from tcllib (snit).
+ * Fixed script which generates documentation index (newer doctool adds
+ class attribute which broke the script).
+ * Added a short description of two modules added to Tklib in 0.5 version.
+
+ -- Sergei Golovan <sgolovan@debian.org> Thu, 19 Mar 2009 18:22:20 +0300
+
+tklib (0.5-1) experimental; urgency=low
+
+ * New upstream release.
+
+ -- Sergei Golovan <sgolovan@debian.org> Tue, 03 Feb 2009 20:52:28 +0300
+
+tklib (0.4.1-20080501-1) unstable; urgency=low
+
+ * New CVS snapshot.
+ * Changed section in doc-base registration file to Programming.
+ * Added copyright statements for individual Tklib modules.
+ * Protected quilt calls in debian/rules to allow converting the source
+ package into 3.0 (quilt) format (closes: #484926).
+ * Cleaned up debian/rules.
+ * Bumped standards version to 3.8.0.
+ * Fixed errors in man pages (lines started with a dot).
+ * Added debian/watch uscan control file to help tracking new upstream
+ releases.
+
+ -- Sergei Golovan <sgolovan@debian.org> Tue, 17 Jun 2008 15:31:42 +0400
+
+tklib (0.4.1-20080125-1) unstable; urgency=low
+
+ * New CVS snapshot.
+ * Removed empty directory /usr/lib from the binary package.
+ * Removed extra leading spaces from continuation strings in doc-base
+ registration file.
+ * Bumped standards version to 3.7.3.
+
+ -- Sergei Golovan <sgolovan@debian.org> Fri, 25 Jan 2008 17:44:11 +0300
+
+tklib (0.4.1-20071020-1) unstable; urgency=low
+
+ * New CVS snapshot.
+ * Adapted the package to Debian Tcl/Tk policy. This includes moving the Tcl
+ modules into a subdirectory of /usr/share/tcltk and switching to default
+ tcl package in dependencies.
+ * Use quilt for patch management.
+ * Fixed ignoring errors in clean target in debian/rules.
+ * Added Homepage field in debian/control.
+
+ -- Sergei Golovan <sgolovan@debian.org> Sat, 17 Nov 2007 11:47:05 +0300
+
+tklib (0.4.1-20070927-1) unstable; urgency=low
+
+ * New CVS snapshot.
+ * Upload to Debian archive (closes: #444415).
+
+ -- Sergei Golovan <sgolovan@debian.org> Sun, 30 Sep 2007 15:53:42 +0400
+
+tklib (0.4.1-20070504-1) unstable; urgency=low
+
+ * New CVS snapshot.
+ * Fixed registering docs in doc-base.
+
+ -- Sergei Golovan <sgolovan@nes.ru> Fri, 11 May 2007 12:06:49 +0400
+
+tklib (0.4.1-20070108-1) unstable; urgency=low
+
+ * New CVS snapshot.
+ * Fixed sections inside manual pages and HTML docs.
+ * Added an index for HTML documentation.
+ * Register HTML docs in doc-base.
+ * Removed tk8.4 from build-dependencies and tcllib from dependencies.
+ * Moved tklib scripts to /usr/share as required by Debian Policy
+ leaving symlink in /usr/lib.
+
+ -- Sergei Golovan <sgolovan@nes.ru> Mon, 08 Jan 2007 01:59:26 +0300
+
+tklib (0.4.1-20061210-2) unstable; urgency=low
+
+ * Fixed manual pages filenames.
+
+ -- Sergei Golovan <sgolovan@nes.ru> Thu, 04 Jan 2007 11:30:53 +0300
+
+tklib (0.4.1-20061210-1) unstable; urgency=low
+
+ * Used current CVS because of KHIM module.
+
+ -- Sergei Golovan <sgolovan@nes.ru> Sun, 10 Dec 2006 13:39:33 +0300
+
+tklib (0.4.1-2) unstable; urgency=low
+
+ * Moved debhelper to Build-Depends section in debian/control file.
+ * Bumped Standards-Version to 3.7.2.
+ * Moved demo.tcl from tkpiechart to docs dir.
+ * Fixed section number in manual pages.
+
+ -- Sergei Golovan <sgolovan@nes.ru> Sun, 10 Dec 2006 00:55:30 +0300
+
+tklib (0.4.1-1) unstable; urgency=low
+
+ * Initial release.
+
+ -- Sergei Golovan <sgolovan@nes.ru> Sat, 09 Dec 2006 23:00:40 +0300
+
--- tklib-0.5.orig/debian/prerm
+++ tklib-0.5/debian/prerm
@@ -0,0 +1,39 @@
+#! /bin/sh
+# prerm script for tklib
+#
+# see: dh_installdeb(1)
+
+set -e
+
+# summary of how this script can be called:
+# * <prerm> remove
+# * <old-prerm> upgrade <new-version>
+# * <new-prerm> failed-upgrade <old-version>
+# * <conflictor's prerm> remove in-favour <package> <new version>
+# * <deconfigured's prerm> deconfigure in-favour <package being installed> <version> \
+# removing <conflicting package> <version>
+# for details, see /usr/share/doc/debian-policy/
+
+case "$1" in
+ upgrade)
+ if [ -h /usr/lib/tklib0.4 ] ; then
+ rm /usr/lib/tklib0.4
+ fi
+ ;;
+
+ remove|failed-upgrade|deconfigure)
+ ;;
+
+ *)
+ echo "prerm called with unknown argument \`$1'" >&2
+ exit 0
+ ;;
+esac
+
+# dh_installdeb will replace this with shell code automatically
+# generated by other debhelper scripts.
+
+#DEBHELPER#
+
+exit 0
+
--- tklib-0.5.orig/debian/examples
+++ tklib-0.5/debian/examples
@@ -0,0 +1 @@
+examples/*
--- tklib-0.5.orig/debian/genindex.tcl
+++ tklib-0.5/debian/genindex.tcl
@@ -0,0 +1,74 @@
+#!/usr/bin/tclsh
+
+set docdir [lindex $argv 0]
+set manuals {}
+
+foreach docfile [glob -nocomplain -directory $docdir *.html] {
+ puts stderr $docfile
+
+ if {[catch {set fd [open $docfile]} msg]} {
+ puts stderr "Can't open file $docfile: $msg"
+ continue
+ }
+
+ while {[gets $fd line] >= 0} {
+ if {[regexp {<h1[^>]*>\s*(.*)\(\S*\)\s+(\S+)\s+(\S+)\s+(.*)</h1>} $line -> \
+ name version module title]} {
+ lappend manuals [list $module!$title!$name $module $name $version $title [file tail $docfile]]
+ break
+ }
+ }
+ close $fd
+}
+
+puts "<html>
+<head>
+<title>Tklib HTML Documentation</title>
+<style type=\"text/css\">
+<!--
+ul {
+ background: lightyellow;
+ border-style: solid;
+ border-width: 1px;
+ border-color: black;
+}
+li {
+ padding: 3px;
+}
+li a {
+ font-weight: bold;
+}
+-->
+</style>
+</head>
+<body>
+<h1>Tklib HTML Documentation</h1>"
+
+set manuals [lsort -index 0 $manuals]
+set prev ""
+foreach m $manuals {
+ set module [lindex $m 1]
+ set name [lindex $m 2]
+ set version [lindex $m 3]
+ set title [lindex $m 4]
+ set fname [lindex $m 5]
+
+ if {$module != $prev} {
+ if {$prev != ""} {
+ puts "</ul>"
+ }
+ puts "<h2>$module</h2>\n<ul>"
+ set prev $module
+ }
+ puts "<li><a href=\"$fname\">$name</a> $version $title</li>"
+}
+puts "
+</ul>
+<h2>tablelist</h2>
+<ul>
+<li><a href=\"tablelist/index.html\">tablelist</a> - "A multicolumn listbox
+package"</li>
+</ul>
+</body>
+</html>"
+
--- tklib-0.5.orig/debian/dirs
+++ tklib-0.5/debian/dirs
@@ -0,0 +1,3 @@
+usr/share/doc/tklib/html
+usr/share/man
+usr/share/tcltk
--- tklib-0.5.orig/debian/install
+++ tklib-0.5/debian/install
@@ -0,0 +1 @@
+modules/tablelist/doc/* usr/share/doc/tklib/html/tablelist
--- tklib-0.5.orig/debian/README.source
+++ tklib-0.5/debian/README.source
@@ -0,0 +1,8 @@
+This package uses quilt to manage all modifications to the upstream
+source. Changes are stored in the source package as diffs in
+debian/patches and applied during the build.
+
+To get detailed instructions on how to apply the series of patches
+and modify them, please read /usr/share/doc/quilt/README.source
+
+ -- Sergei Golovan <sgolovan@debian.org> Sun, 18 Dec 2011 22:27:53 +0400
--- tklib-0.5.orig/debian/checkout
+++ tklib-0.5/debian/checkout
@@ -0,0 +1,26 @@
+#!/usr/bin/expect
+
+switch -- [llength $argv] {
+ 0 {
+ set date "now"
+ set dir .
+ }
+ 1 {
+ set date "now"
+ set dir [lindex $argv 0]
+ }
+ default {
+ set date [clock format [expr {[clock scan [lindex $argv 1]] + 24*60*60}] -format %Y%m%dT%H:%M:%S]
+ set dir [lindex $argv 0]
+ }
+}
+
+cd $dir
+
+set cvsroot ":pserver:anonymous@tcllib.cvs.sourceforge.net:/cvsroot/tcllib"
+spawn cvs -q -d$cvsroot login
+expect -re "assword: "
+send "\r"
+system "cvs -q -d$cvsroot -z9 co -D \"$date\" tklib"
+system "cvs -q -d$cvsroot logout"
+
--- tklib-0.5.orig/debian/control
+++ tklib-0.5/debian/control
@@ -0,0 +1,42 @@
+Source: tklib
+Section: interpreters
+Priority: optional
+Maintainer: Sergei Golovan <sgolovan@debian.org>
+Build-Depends: debhelper (>= 5.0.0), quilt
+Build-Depends-Indep: tk-dev, tcllib, imagemagick
+Standards-Version: 3.9.2
+Homepage: http://sourceforge.net/projects/tcllib/
+
+Package: tklib
+Section: interpreters
+Architecture: all
+Depends: ${wish:Depends}, ${misc:Depends}
+Recommends: tcllib (>= 1.11)
+Description: standard Tk Library
+ Tklib, the standard Tk library, is a collection of common utility
+ functions and widgets all written in pure Tcl/Tk.
+ .
+ Modules included:
+ autoscroll: automatically maps scrollbars when they are needed;
+ canvas: provides a canvas with map background based on square tiles;
+ chatwidget: a composite widget for chat applications;
+ crosshair: provides commands to (de)activate and track crosshairs;
+ on canvas widgets;
+ ctext: a text widget with syntax highlighting support;
+ cursor: provides a few cursor routines;
+ datefield: an entry widget for the purpose of date entry;
+ Diagrams: helps drawing diagrams, like flowcharts;
+ getstring: a dialog which prompts for a string input;
+ history: provides a history for mechanism for entry widgets;
+ ico: provides functions for reading and writing windows icons;
+ ipentry: a widget for the entering of an IP address;
+ khim: provides key bindings for entering international
+ characters on a keyboard that does not support them;
+ ntext: provides alternative bindings for the Text widget;
+ Plotchart: provides simple plotting and charting commands;
+ style: provides simple theming using Tk options;
+ swaplist: a dialog which allows one to move options between two lists;
+ tablelist: a multicolumn listbox widget;
+ tkpiechart: 2D or 3D pie chart object in a canvas;
+ tooltip: provides tooltips for Tk widgets;
+ widget: a set of megawidgets based on snit system.
--- tklib-0.5.orig/debian/doc-base
+++ tklib-0.5/debian/doc-base
@@ -0,0 +1,11 @@
+Document: tklib
+Title: Tklib Documentation
+Author: Authors of the Tklib modules
+Abstract: This is a documentation for Tklib - the standard Tk library.
+ It contains documentation on individual Tklib modules, supplied
+ with upstream distribution.
+Section: Programming
+
+Format: HTML
+Index: /usr/share/doc/tklib/html/index.html
+Files: /usr/share/doc/tklib/html/*.html
--- tklib-0.5.orig/debian/rules
+++ tklib-0.5/debian/rules
@@ -0,0 +1,154 @@
+#!/usr/bin/make -f
+# debian/rules that uses debhelper.
+
+# Uncomment this to turn on verbose mode.
+#export DH_VERBOSE=1
+
+export QUILT_PATCHES := debian/patches
+
+version = 0.5
+#cvsdate = 20080501
+
+destdir=debian/tklib
+mandir=/usr/share/man
+docdir=/usr/share/doc/tklib
+exampledir=$(docdir)/examples
+
+unpatch:
+ dh_testdir
+ quilt pop -a || test $$? = 2
+ rm -rf patch-stamp .pc
+
+patch: patch-stamp
+patch-stamp:
+ dh_testdir
+ quilt push -a || test $$? = 2
+ touch patch-stamp
+
+clean: clean-patched unpatch
+ dh_testdir
+ dh_testroot
+ dh_clean
+
+clean-patched: patch-stamp
+ dh_testdir
+ dh_testroot
+ #
+ [ ! -f Makefile ] || $(MAKE) distclean
+ rm -f build-stamp install-stamp
+
+# Build mostly covers docs and such
+build-arch: build-stamp
+build-indep: build-stamp
+build: build-stamp
+build-stamp: patch-stamp
+ dh_testdir
+ ./configure --prefix=/usr --mandir=$(mandir)
+ $(MAKE) doc
+ #
+ touch build-stamp
+
+install: install-stamp
+install-stamp: build-stamp
+ dh_testdir
+ dh_testroot
+ dh_installdirs
+ #
+ $(MAKE) DESTDIR=$(destdir) install
+ #
+ find $(destdir)/usr/lib -name repair.tcl -delete
+ #
+ # now set the permissions properly, since the Makefile doesn't bother
+ find $(destdir)/usr/lib -type f -print | xargs chmod 644
+ #
+ # move scripts to /usr/share
+ mv $(destdir)/usr/lib/* $(destdir)/usr/share/tcltk
+ rmdir $(destdir)/usr/lib
+ #
+ # rename the man pages into section 3, and clean up
+ mv $(destdir)$(mandir)/mann $(destdir)$(mandir)/man3
+ #
+ # Several manpages has incorrect filenames (in lowercase), so take them
+ # from the headers
+ # Also, replace section n by 3tk
+ cd $(destdir)$(mandir)/man3 && \
+ for f in *.n ; do \
+ name=`grep '^\.TH' <$$f | sed 's/^\.TH "\([^ ]\+\)".*/\1/'`; \
+ sed -e'/\.so man.macros/ d' \
+ -e's/^\.TH \([^ ]\+\) n/.TH \1 3tk/' \
+ -e's/clock(n)/clock(3tcl)/g' \
+ -e's/(n)/(3tk)/g' \
+ -e's/(3)/(3tk)/g' \
+ -e's/spIf/sp 1\nIf/' \
+ -e's/\.sp Fu/\.sp 1\nFu/' \
+ -e's/ΓΌ/\\[:u]/g' \
+ -e's/"A dialog which allows a user to m/"M/' \
+ $$f > $$name.3tk; \
+ rm $$f; \
+ done
+ #
+ # cleanup docs
+ cd doc/html && \
+ for f in *.html ; do \
+ sed -i -e's/clock(n)/clock(3tcl)/g' \
+ -e's/(n)/(3tk)/g' \
+ -e's/(3)/(3tk)/g' $$f; \
+ done
+ #
+ # generate documentation index
+ tclsh debian/genindex.tcl doc/html >$(destdir)$(docdir)/html/index.html
+ #
+ touch install-stamp
+
+binary-indep: build install
+ dh_testdir
+ dh_testroot
+ dh_install
+ dh_installdocs
+ dh_installexamples
+ #
+ # Fix incorrect permissions
+ find $(destdir)$(exampledir) -type f -print | xargs chmod 644
+ #
+ # Fix canvas example
+ convert -geometry 400x300 $(destdir)$(exampledir)/canvas/morgens.jpg \
+ $(destdir)$(exampledir)/canvas/morgens1.jpg
+ mv -f $(destdir)$(exampledir)/canvas/morgens1.jpg \
+ $(destdir)$(exampledir)/canvas/morgens.jpg
+ sed -i -e 's/^source/#source/' \
+ -e 's/256/100/' $(destdir)$(exampledir)/canvas/puzzle.tcl
+ #
+ dh_installchangelogs ChangeLog
+ dh_compress -Xusr/share/doc/tklib/examples/ \
+ -Xusr/share/doc/tklib/html
+ dh_fixperms
+ dh_installdeb
+ tcltk-depends
+ dh_gencontrol
+ dh_md5sums
+ dh_builddeb
+
+binary-arch: build install
+
+get-orig-source: get-orig-source-release
+
+get-orig-source-cvs:
+ CURDIR=`pwd` && \
+ TMPDIR=`mktemp -d /tmp/tklib.XXXXXX` && \
+ SCRDIR=`dirname $(MAKEFILE_LIST)` && \
+ expect $$SCRDIR/checkout $$TMPDIR "$(cvsdate)T23:59:59" && \
+ rm -rf $$TMPDIR/tklib/config/ && \
+ find $$TMPDIR -name CVS -print | xargs rm -rf && \
+ cd $$TMPDIR && \
+ tar -zcf $$CURDIR/tklib_$(version)-$(cvsdate).orig.tar.gz . && \
+ rm -rf $$TMPDIR
+
+get-orig-source-release:
+ wget -O tklib_$(version).orig.tar.gz \
+ http://heanet.dl.sourceforge.net/sourceforge/tcllib/tklib-$(version).tar.gz
+
+source diff:
+ @echo >&2 'source and diff are obsolete - use dpkg-source -b'; false
+
+binary: binary-indep binary-arch
+.PHONY: patch unpatch clean-patched build build-arch build-indep clean binary-indep binary-arch binary install get-orig-source-cvs get-orig-source-release
--- tklib-0.5.orig/debian/patches/manpages.diff
+++ tklib-0.5/debian/patches/manpages.diff
@@ -0,0 +1,182 @@
+Patch by Sergei Golovan fixes errors in manual pages (several words started
+with a dot are treated as undefined macros). Also, -full is treated as an argument.
+
+--- tklib-0.5.orig/modules/chatwidget/chatwidget.man
++++ tklib-0.5/modules/chatwidget/chatwidget.man
+@@ -55,7 +55,7 @@
+ Control the names and tags associated with names.
+ [list_begin commands]
+ [cmd_def "list [opt [arg -full]]"]
+-Returns a list of all the user names from the names view. If [opt \
++Returns a list of all the user names from the names view. If [arg \
+ -full] is given then the list returned is a list of lists where each
+ sublist is made up of the nick followed by any options that have been
+ set on this nick entry. This may be used to examine any application
+@@ -97,17 +97,17 @@
+ [section EXAMPLE]
+
+ [example {
+-chatwidget::chatwidget .chat
+-proc speak {w msg} {$w message $msg -nick user}
+-.chat hook add post [list speak .chat]
+-pack .chat -side top -fill both -expand 1
+-.chat topic show
+-.chat topic set "Chat widget demo"
+-.chat name add "admin" -group admin
+-.chat name add "user" -group users -color tomato
+-.chat message "Chatwidget ready" -type system
+-.chat message "Hello, user" -nick admin
+-.chat message "Hello, admin" -nick user
++ chatwidget::chatwidget .chat
++ proc speak {w msg} {$w message $msg -nick user}
++ .chat hook add post [list speak .chat]
++ pack .chat -side top -fill both -expand 1
++ .chat topic show
++ .chat topic set "Chat widget demo"
++ .chat name add "admin" -group admin
++ .chat name add "user" -group users -color tomato
++ .chat message "Chatwidget ready" -type system
++ .chat message "Hello, user" -nick admin
++ .chat message "Hello, admin" -nick user
+ }]
+
+ [para]
+--- tklib-0.5.orig/modules/history/tklib_history.man
++++ tklib-0.5/modules/history/tklib_history.man
+@@ -46,7 +46,7 @@
+
+ This command queries or sets configuration options. Currently the options recognized
+ are [arg length] and [arg alert]. Setting the length determines the number of history entries to keep for
+-the named Entry. Alert specifies the command to run when the user reaches the end of the history, it defaults to [call bell]. Although configure requires a [arg pathName] argument, the setting for alert is global and the path is ignored.
++the named Entry. Alert specifies the command to run when the user reaches the end of the history, it defaults to [cmd bell]. Although configure requires a [arg pathName] argument, the setting for alert is global and the path is ignored.
+
+ [list_end]
+
+--- tklib-0.5.orig/modules/ntext/ntextIndent.man
++++ tklib-0.5/modules/ntext/ntextIndent.man
+@@ -101,39 +101,39 @@
+ To switch on [emph Ntext] 's indentation and use it in widget .t:
+
+ [example {
+-package require ntext
+-set ::ntext::classicWrap 0
+-text .t -wrap word
+-bindtags .t {.t Ntext . all}
++ package require ntext
++ set ::ntext::classicWrap 0
++ text .t -wrap word
++ bindtags .t {.t Ntext . all}
+ }]
+
+ To decide later to switch off [emph Ntext] 's indentation:
+
+ [example {
+-set ::ntext::classicWrap 1
+-::ntext::wrapIndent .t
++ set ::ntext::classicWrap 1
++ ::ntext::wrapIndent .t
+ }]
+
+ To decide later to switch [emph Ntext] 's indentation back on:
+
+ [example {
+-set ::ntext::classicWrap 0
+-::ntext::wrapIndent .t 1.0 end
++ set ::ntext::classicWrap 0
++ ::ntext::wrapIndent .t 1.0 end
+ }]
+
+ To inject some text into the widget:
+
+ [example {
+-set foo [.t index end]
+-.t insert end {This line was added by the script, not the keyboard!}
+-::ntext::wrapIndent .t $foo end
++ set foo [.t index end]
++ .t insert end {This line was added by the script, not the keyboard!}
++ ::ntext::wrapIndent .t $foo end
+ }]
+
+ To switch to [arg -wrap] [arg char] mode:
+
+ [example {
+-.t configure -wrap char
+-::ntext::wrapIndent .t
++ .t configure -wrap char
++ ::ntext::wrapIndent .t
+ }]
+
+
+--- tklib-0.5.orig/modules/tooltip/tooltip.man
++++ tklib-0.5/modules/tooltip/tooltip.man
+@@ -97,44 +97,44 @@
+ [section EXAMPLE]
+
+ [example {
+-# Demonstrate widget tooltip
+-package require tooltip
+-pack [label .l -text "label"]
+-tooltip::tooltip .l "This is a label widget"
++ # Demonstrate widget tooltip
++ package require tooltip
++ pack [label .l -text "label"]
++ tooltip::tooltip .l "This is a label widget"
+ }]
+
+ [example {
+-# Demonstrate menu tooltip
+-package require tooltip
+-. configure -menu [menu .menu]
+-.menu add cascade -label Test -menu [menu .menu.test -tearoff 0]
+-.menu.test add command -label Tooltip
+-tooltip::tooltip .menu.test -index 0 "This is a menu tooltip"
++ # Demonstrate menu tooltip
++ package require tooltip
++ . configure -menu [menu .menu]
++ .menu add cascade -label Test -menu [menu .menu.test -tearoff 0]
++ .menu.test add command -label Tooltip
++ tooltip::tooltip .menu.test -index 0 "This is a menu tooltip"
+ }]
+
+ [example {
+-# Demonstrate canvas item tooltip
+-package require tooltip
+-pack [canvas .c]
+-set item [.c create rectangle 10 10 80 80]
+-tooltip::tooltip .c -item $item "Canvas item tooltip"
++ # Demonstrate canvas item tooltip
++ package require tooltip
++ pack [canvas .c]
++ set item [.c create rectangle 10 10 80 80]
++ tooltip::tooltip .c -item $item "Canvas item tooltip"
+ }]
+
+ [example {
+-# Demonstrate listbox item tooltip
+-package require tooltip
+-pack [listbox .lb]
+-.lb insert 0 "item one"
+-tooltip::tooltip .lb -item 0 "Listbox item tooltip"
++ # Demonstrate listbox item tooltip
++ package require tooltip
++ pack [listbox .lb]
++ .lb insert 0 "item one"
++ tooltip::tooltip .lb -item 0 "Listbox item tooltip"
+ }]
+
+ [example {
+-# Demonstrate text tag tooltip
+-package require tooltip
+-pack [text .txt]
+-.txt tag configure TIP-1 -underline 1
+-tooltip::tooltip .txt -tag TIP-1 "tooltip one text"
+-.txt insert end "An example of a " {} "tooltip" TIP-1 " tag.\n" {}
++ # Demonstrate text tag tooltip
++ package require tooltip
++ pack [text .txt]
++ .txt tag configure TIP-1 -underline 1
++ tooltip::tooltip .txt -tag TIP-1 "tooltip one text"
++ .txt insert end "An example of a " {} "tooltip" TIP-1 " tag.\n" {}
+ }]
+
+ [keywords tooltip hover balloon help]
--- tklib-0.5.orig/debian/patches/series
+++ tklib-0.5/debian/patches/series
@@ -0,0 +1,2 @@
+manpages.diff
+osm.diff
--- tklib-0.5.orig/debian/patches/osm.diff
+++ tklib-0.5/debian/patches/osm.diff
@@ -0,0 +1,34 @@
+Patch fixes the openstreetmap demo.
+
+--- tklib-0.5.orig/examples/canvas/osm.tcl
++++ tklib-0.5/examples/canvas/osm.tcl
+@@ -38,17 +38,12 @@
+ ## separate packages, etc.
+
+ # ### ### ### ######### ######### #########
+-## Use canvas package relative to example location.
++## Use canvas package
+
+ set selfdir [file dirname [file normalize [info script]]]
+-set modules [file join [file dirname [file dirname $selfdir]] modules]
+-set lmodule [file join [file dirname [file dirname [file dirname [file dirname $selfdir]]]] Tcllib Head modules]
+
+-set dir $lmodule/map
+-source $lmodule/map/pkgIndex.tcl
+-unset dir
+-source $modules/canvas/canvas_sqmap.tcl ; # The main map support
+-source $modules/canvas/canvas_zoom.tcl ; # Zoom control
++package require canvas::sqmap
++package require canvas::zoom
+
+ ## Ideas:
+ ## == DONE ==
+@@ -288,6 +283,8 @@
+
+ #puts ".z = $level"
+
++ if {$level<0} { set level 0 }
++
+ set rlength [map::slippy length $level]
+ set region [list 0 0 $rlength $rlength]
+
![[patchlogo]](http://patch-tracker.debian.org/static/img/swirlpatch.png)