reboot: Use reboot'.
* gash/commands/reboot.scm (reboot'): Rename from reboot. Update users.
This commit is contained in:
parent
8bcc6d3c82
commit
6e396759a3
|
@ -77,7 +77,7 @@
|
|||
(define find-command (wrap-command "find" find))
|
||||
(define grep-command (wrap-command "grep" grep))
|
||||
(define ls-command (wrap-command "ls" ls))
|
||||
(define reboot-command (wrap-command "reboot" reboot))
|
||||
(define reboot-command (wrap-command "reboot" reboot'))
|
||||
(define rm-command (wrap-command "rm" rm))
|
||||
(define sed-command (wrap-command "sed" sed))
|
||||
(define tar-command (wrap-command "tar" tar))
|
||||
|
|
|
@ -27,10 +27,10 @@
|
|||
|
||||
(define-module (gash commands reboot)
|
||||
#:export (
|
||||
reboot
|
||||
reboot'
|
||||
))
|
||||
|
||||
(define (reboot name . args)
|
||||
(define (reboot' name . args)
|
||||
"Emit code for 'reboot'."
|
||||
;; Normally Bournish is used in the initrd, where 'reboot' is provided
|
||||
;; directly by (guile-user). In other cases, just bail out.
|
||||
|
@ -41,4 +41,4 @@
|
|||
"I don't know how to reboot, sorry about that!~%")
|
||||
1)))
|
||||
|
||||
(define main reboot)
|
||||
(define main reboot')
|
||||
|
|
Loading…
Reference in New Issue