Mercurial > hg > egg-tcls

diff feeds.tcl @ 596:b524a6e4be63

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
feeds: Slight cleanup.
author Matti Hamalainen <ccr@tnsp.org>
date Wed, 03 Feb 2021 11:50:02 +0200
parents 7f7d8048ecb5
children 1d39db72e190
line wrap: on
line diff
--- a/feeds.tcl	Wed Feb 03 11:05:59 2021 +0200
+++ b/feeds.tcl	Wed Feb 03 11:50:02 2021 +0200
@@ -132,7 +132,7 @@
 
 proc feeds_validate_name {upublic unick uchan upattern ufname} {
   global feeds_dbh
-  upvar 1 $ufname afname
+  upvar $ufname afname
 
   # Check value
   if {$upattern == ""} {