Commit 11c5f8e1 authored by Robert Ricci's avatar Robert Ricci
Browse files

Changed '_' to '-' in virtual names, to make them valid in DNS.

parent f8c59dd4
......@@ -34,7 +34,7 @@ proc set {args} {
if {$var != "currnode" && $var != "currlan"} {
if {[llength $args] > 1} {
# Munge var in case it's a variable
regsub -all {[()]} $var {_} out
regsub -all {[()]} $var {-} out
set var $out
real_set val [lindex $args 1]
if {([regexp {^n[0-9]+$} $val] != -1) ||
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment