From 6e396759a3ab1ac67fc836c5dac3c2adb9d20116 Mon Sep 17 00:00:00 2001 From: Jan Nieuwenhuizen Date: Sun, 4 Nov 2018 07:27:59 +0100 Subject: [PATCH] reboot: Use reboot'. * gash/commands/reboot.scm (reboot'): Rename from reboot. Update users. --- gash/bournish-commands.scm | 2 +- gash/commands/reboot.scm | 6 +++--- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/gash/bournish-commands.scm b/gash/bournish-commands.scm index 7ceb818..6759fe3 100644 --- a/gash/bournish-commands.scm +++ b/gash/bournish-commands.scm @@ -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)) diff --git a/gash/commands/reboot.scm b/gash/commands/reboot.scm index 490fe28..b0783ad 100644 --- a/gash/commands/reboot.scm +++ b/gash/commands/reboot.scm @@ -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')