working bash wrapper
This commit is contained in:
parent
79d25d0d73
commit
de1970dbc7
20
icecast-ssl-helper
Executable file
20
icecast-ssl-helper
Executable file
@ -0,0 +1,20 @@
|
||||
#!/bin/env bash
|
||||
|
||||
## guile_installed () {
|
||||
## if $(which guile)
|
||||
## then
|
||||
## GUILE_BIN="guile"
|
||||
## elif $(which guile3.0)
|
||||
## then
|
||||
## GUILE_BIN="guile3.0"
|
||||
## else
|
||||
## which apt && sudo apt install guile-3.0 || echo -e "\nERROR: apt Package Manager not found.\n\
|
||||
## This script only supports Debian-based Linux Distributions which use the apt package manager, like Raspbian OS." && exit 127
|
||||
## fi
|
||||
## }
|
||||
|
||||
## guile_installed
|
||||
|
||||
GUILE_BIN="guile3.0"
|
||||
|
||||
$GUILE_BIN -s icecast-ssl-helper.scm
|
8
icecast-ssl-helper.scm
Normal file
8
icecast-ssl-helper.scm
Normal file
@ -0,0 +1,8 @@
|
||||
(use-modules (ssh session))
|
||||
|
||||
(display "Hello there.\n")
|
||||
|
||||
(define (myproc x y)
|
||||
(string-append "x is " x "\nand y is " y "\n"))
|
||||
|
||||
(values (myproc "7" "9"))
|
Loading…
Reference in New Issue
Block a user