From 9bb036f18457a6c2d24343e21e6950f9df5043e7 Mon Sep 17 00:00:00 2001 From: Christopher Allan Webber Date: Sun, 29 Nov 2015 10:32:04 -0600 Subject: [PATCH] Renaming `eightsync' to `8sync' everywhere in the code * eightsync/agenda.scm, 8sync/agenda.scm: Renamed * eightsync/repl.scm, 8sync/repl.scm: Renamed * eightsync/systems/irc.scm, 8sync/systems/irc.scm: Renamed * demos/ircbot.scm: Changed module import to 8sync * tests/test-agenda.scm: Changed module import to 8sync * Makefile.am: Updated to reference new file naming --- {eightsync => 8sync}/agenda.scm | 2 +- {eightsync => 8sync}/repl.scm | 4 ++-- {eightsync => 8sync}/systems/irc.scm | 6 +++--- Makefile.am | 6 +++--- demos/ircbot.scm | 4 ++-- tests/test-agenda.scm | 4 ++-- 6 files changed, 13 insertions(+), 13 deletions(-) rename {eightsync => 8sync}/agenda.scm (99%) rename {eightsync => 8sync}/repl.scm (95%) rename {eightsync => 8sync}/systems/irc.scm (99%) diff --git a/eightsync/agenda.scm b/8sync/agenda.scm similarity index 99% rename from eightsync/agenda.scm rename to 8sync/agenda.scm index 5a2aea2..c2614ef 100644 --- a/eightsync/agenda.scm +++ b/8sync/agenda.scm @@ -16,7 +16,7 @@ ;;; You should have received a copy of the GNU Lesser General Public ;;; License along with 8sync. If not, see . -(define-module (eightsync agenda) +(define-module (8sync agenda) #:use-module (srfi srfi-1) #:use-module (srfi srfi-9) #:use-module (srfi srfi-9 gnu) diff --git a/eightsync/repl.scm b/8sync/repl.scm similarity index 95% rename from eightsync/repl.scm rename to 8sync/repl.scm index 37b843f..bc68138 100644 --- a/eightsync/repl.scm +++ b/8sync/repl.scm @@ -16,9 +16,9 @@ ;;; You should have received a copy of the GNU Lesser General Public ;;; License along with 8sync. If not, see . -(define-module (eightsync repl) +(define-module (8sync repl) #:use-module (ice-9 q) - #:use-module (eightsync agenda) + #:use-module (8sync agenda) #:use-module (system repl coop-server) #:export (make-coop-server-handler spawn-and-queue-repl-server!)) diff --git a/eightsync/systems/irc.scm b/8sync/systems/irc.scm similarity index 99% rename from eightsync/systems/irc.scm rename to 8sync/systems/irc.scm index c872b46..7ab9316 100755 --- a/eightsync/systems/irc.scm +++ b/8sync/systems/irc.scm @@ -20,9 +20,9 @@ ;;; You should have received a copy of the GNU Lesser General Public ;;; License along with 8sync. If not, see . -(define-module (eightsync systems irc) - #:use-module (eightsync repl) - #:use-module (eightsync agenda) +(define-module (8sync systems irc) + #:use-module (8sync repl) + #:use-module (8sync agenda) #:use-module (srfi srfi-9) #:use-module (ice-9 getopt-long) #:use-module (ice-9 format) diff --git a/Makefile.am b/Makefile.am index 01d913c..f6c0131 100644 --- a/Makefile.am +++ b/Makefile.am @@ -45,9 +45,9 @@ moddir=$(prefix)/share/guile/site/2.0 godir=$(libdir)/guile/2.0/ccache SOURCES = \ - eightsync/agenda.scm \ - eightsync/repl.scm \ - eightsync/systems/irc.scm + 8sync/agenda.scm \ + 8sync/repl.scm \ + 8sync/systems/irc.scm TESTS = \ diff --git a/demos/ircbot.scm b/demos/ircbot.scm index a72ae40..49b241f 100755 --- a/demos/ircbot.scm +++ b/demos/ircbot.scm @@ -20,8 +20,8 @@ ;;; You should have received a copy of the GNU Lesser General Public ;;; License along with 8sync. If not, see . -(use-modules (eightsync systems irc) - (eightsync agenda) +(use-modules (8sync systems irc) + (8sync agenda) (ice-9 match)) (define (handle-message socket my-name speaker diff --git a/tests/test-agenda.scm b/tests/test-agenda.scm index 3011a86..f6a57c1 100644 --- a/tests/test-agenda.scm +++ b/tests/test-agenda.scm @@ -24,7 +24,7 @@ #:use-module (srfi srfi-64) #:use-module (ice-9 q) #:use-module (ice-9 receive) - #:use-module (eightsync agenda) + #:use-module (8sync agenda) #:use-module (tests utils)) (test-begin "test-agenda") @@ -262,7 +262,7 @@ (define (test-%run-and-friends async-request expected-when) (let* ((fake-kont (speak-it)) - (run-request ((@@ (eightsync agenda) setup-async-request) + (run-request ((@@ (8sync agenda) setup-async-request) fake-kont async-request))) (test-equal (car async-request) '*async-request*) (test-equal (run-request-when run-request) expected-when) -- 2.31.1