Remove superfluous trailing white space from TCL files

This commit is contained in:
Douglas Clowes
2014-05-16 12:30:51 +10:00
parent 89e4e37f9e
commit 92d3acb5d5
230 changed files with 1835 additions and 1835 deletions

View File

@@ -174,11 +174,11 @@ proc getCMD {channel line} {
}
}
}
# Reads a command from a DMC2280 client and then performs an appropriate
# Reads a command from a DMC2280 client and then performs an appropriate
# action depending on whether or not the command produces output or has
# been defined.
proc readLine {who channel} {
global didRead
global didRead
global B
global validUID
global validPWD
@@ -191,7 +191,7 @@ proc readLine {who channel} {
puts "RECEIVED EOF: $line"
close $f
return -code error "Got EOF, close channel"
} else {
} else {
puts "RECEIVED: $line"
switch $serverState {
"UID" {