X-Git-Url: http://christophe.rhodes.io/gitweb/?p=swankr.git;a=blobdiff_plain;f=swank.R;h=e6e78c7e15996168ad9db03c1ab154c3d2dd9b9e;hp=b9d89cbc6959c37b59a0e2c16ec7d064ee677a7b;hb=2c0d53bc49f3dd18df3227759ba4ff40c8535ee5;hpb=f5a8e9accbff9a90697cf14b159b7ce1f8335815

diff --git a/swank.R b/swank.R
index b9d89cb..e6e78c7 100644
--- a/swank.R
+++ b/swank.R
@@ -259,6 +259,12 @@ printToString <- function(val) {
 }
 
 `swank:swank-require` <- function (slimeConnection, sldbState, contribs) {
+  for(contrib in contribs) {
+    filename <- sprintf("%s.R", as.character(contrib))
+    if(file.exists(filename)) {
+      source(filename, verbose=TRUE)
+    }
+  }
   list()
 }