Subversion Repositories HomeAutomation

Rev

Rev 2158 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | SVN | RSS feed

Rev 2158 Rev 2159
Line 12... Line 12...
12 
            Blocking => 1,
 12 
            Blocking => 1,
13 
        )
 13 
        )
14 
        or die "Error: Cannot connect to port $port at $host\n";
 14 
        or die "Error: Cannot connect to port $port at $host\n";
15 
 
 15 
 
16 
    return $socket;
 16 
    return $socket;
- 
 
 17 
}
- 
 
 18 
 
- 
 
 19 
sub atomd_disconnect
- 
 
 20 
{
- 
 
 21 
    ($socket) = @_;
- 
 
 22 
    close($socket);
17 
}
 23 
}
18 
 
 24 
 
19 
# ----------------- Atom JS functions -----------------
 25 
# ----------------- Atom JS functions -----------------
20 
sub atomjs_read_line
 26 
sub atomjs_read_line
21 
{
 27 
{