From b02ab677ff2b0dd025adde55df9240abe821d906 Mon Sep 17 00:00:00 2001
From: William Joye <wjoye@cfa.harvard.edu>
Date: Wed, 9 Aug 2017 13:30:16 -0400
Subject: fix smooth lock

---
 ds9/doc/release/r7.6.html | 2 +-
 ds9/library/smooth.tcl    | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/ds9/doc/release/r7.6.html b/ds9/doc/release/r7.6.html
index 4a45d45..b6d445c 100644
--- a/ds9/doc/release/r7.6.html
+++ b/ds9/doc/release/r7.6.html
@@ -117,7 +117,7 @@
         <li><tt>08.07.2017 RULER: added length format spec. supports sprintf syntax.</tt></li>
         <li><tt>08.08.2017 TKMPEG: updated to version 1.0.4</tt></li>
         <li><tt>08.08.2017 TKBLT: updated to version 3.2.7</tt></li>
-        <li><tt><b>xx.xx.2017 RELEASE version 7.6b4</b></tt></li>
+        <li><tt><b>08.15.2017 RELEASE version 7.6b4</b></tt></li>
       </ol>
     </ol>
   </body>
diff --git a/ds9/library/smooth.tcl b/ds9/library/smooth.tcl
index ddb7dd8..75d03a2 100644
--- a/ds9/library/smooth.tcl
+++ b/ds9/library/smooth.tcl
@@ -251,7 +251,7 @@ proc MatchSmooth {which} {
     set view [$which has smooth]
     set function [$which get smooth function]
     set radius [$which get smooth radius]
-    set minor [$which get smooth radius minor]
+    set radiusminor [$which get smooth radius minor]
     set sigma [$which get smooth sigma]
     set sigmaminor [$which get smooth sigma minor]
     set angle [$which get smooth angle]
-- 
cgit v0.12