diff options
Diffstat (limited to 'modules/ssh/channel.scm')
| -rw-r--r-- | modules/ssh/channel.scm | 13 |
1 files changed, 12 insertions, 1 deletions
diff --git a/modules/ssh/channel.scm b/modules/ssh/channel.scm index 5660978..361c14f 100644 --- a/modules/ssh/channel.scm +++ b/modules/ssh/channel.scm @@ -63,7 +63,8 @@ channel-cancel-forward channel-request-send-exit-status channel-set-pty-size! - channel-set-stream! + channel-stream-set! + channel-set-stream! ; deprecated channel-stream channel-get-stream ; deprecated channel-session @@ -105,6 +106,16 @@ Return one of the following symbols: stdout, stderr." "Use 'channel-stream' instead.") (%gssh-channel-stream channel)) +(define (channel-stream-set! channel stream) + "Set stream STREAM for channel CHANNEL. STREAM must be one of the following +symbols: stdout (default), stderr. Return value is undefined." + (%gssh-channel-stream-set! channel stream)) + +(define (channel-set-stream! channel stream) + (issue-deprecation-warning "'channel-get-stream' is deprecated. " + "Use 'channel-stream' instead.") + (%gssh-channel-stream-set! channel stream)) + (define* (channel-open-forward channel #:key (source-host "localhost") local-port |