HCoop
/
clinton
/
bobotpp.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
blame
|
history
|
raw
|
HEAD
Add config dir to default load path
[clinton/bobotpp.git]
/
examples
/
scripts
/
uname
1
;;; -*- scheme -*-
2
(use-modules (ice-9 popen)
3
(ice-9 rdelim))
4
5
(define (uname c)
6
(let* ((p (open-input-pipe "/bin/uname -a"))
7
(s (read-line p)))
8
(close-pipe p)
9
(bot:say c s)))
10
11
(bot:addcommand "uname" uname #t 0 1)