X-Git-Url: http://christophe.rhodes.io/gitweb/?p=swankr.git;a=blobdiff_plain;f=swankr.el;fp=swankr.el;h=9ddeeab580bee6742ce92b98a96c79d00c9c95f8;hp=0000000000000000000000000000000000000000;hb=cfbfd5bbd369242017802df89fb51afa97744b48;hpb=3bf571b71b14d5d953c84b0158e5d25a60663083

diff --git a/swankr.el b/swankr.el
new file mode 100644
index 0000000..9ddeeab
--- /dev/null
+++ b/swankr.el
@@ -0,0 +1,13 @@
+(require 'ess-help)
+
+(defun swankr-operator-before-point ()
+  (ignore-errors
+    (save-excursion
+      (backward-up-list 1)
+      (slime-symbol-at-point))))
+
+(add-hook 'R-mode-hook
+          (defun swankr/R-mode-hook ()
+            (slime-mode 1)
+            (set (make-local-variable 'slime-operator-before-point-function) 'swankr-operator-before-point)
+            (local-set-key (kbd "(") 'slime-space)))