From 8d5d18c14d5567afa5a643faa9764a89c0b2ad74 Mon Sep 17 00:00:00 2001
From: David Thompson <dthompson2@worcester.edu>
Date: Fri, 9 Oct 2015 13:29:10 -0400
Subject: emacs: Add connect-to-dmd function.

---
 dotfiles/.emacs.d/init.el | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/dotfiles/.emacs.d/init.el b/dotfiles/.emacs.d/init.el
index 4b187a3..c3a6c06 100644
--- a/dotfiles/.emacs.d/init.el
+++ b/dotfiles/.emacs.d/init.el
@@ -313,6 +313,11 @@ indentation."
   (interactive)
   (geiser-connect 'guile "localhost" "37147"))
 
+(defun connect-to-dmd ()
+  "Connect to dmd's REPL server."
+  (interactive)
+  (geiser-connect 'guile "localhost" "37148"))
+
 (put 'and-let* 'scheme-indent-function 1)
 (put 'syntax-parameterize 'scheme-indent-function 1)
 (put 'with-mutex 'scheme-indent-function 1)
-- 
cgit v1.2.3