X-Git-Url: https://jxself.org/git/?p=8sync.git;a=blobdiff_plain;f=eightsync%2Fagenda.scm;h=386752695c41968c96a81df2d13e86983dae2220;hp=77bd63b5ccc0f6ec9f598a8edb2bcbfb22a8edf8;hb=21857a053fd1ba6af66d95a2874193aeef20c4a2;hpb=568b5594aed6a98b0777fe7289547094ae9d0b2b diff --git a/eightsync/agenda.scm b/eightsync/agenda.scm index 77bd63b..3867526 100644 --- a/eightsync/agenda.scm +++ b/eightsync/agenda.scm @@ -64,7 +64,6 @@ run-it wrap wrap-apply run run-at run-delay %port-request %run %run-at %run-delay - 8port-request 8run 8run-at 8run-delay print-error-and-continue @@ -520,12 +519,6 @@ return the wrong thing via (%8sync) and trip themselves up." (lambda () body ...))))) -;; Aliases -(define-syntax-rule (8run args ...) (%run args ...)) -(define-syntax-rule (8run-at args ...) (%run-at args ...)) -(define-syntax-rule (8run-delay args ...) (%run-delay args ...)) -(define-syntax-rule (8port-request args ...) (%port-request args ...)) - ;;; Execution of agenda, and current agenda