diff --git a/el/sclang-mode.el b/el/sclang-mode.el
index f468eef..1ed5905 100644
--- a/el/sclang-mode.el
+++ b/el/sclang-mode.el
@@ -183,6 +183,7 @@
     "if"
     "ir"
     "kr"
+    "tr"
     "loop"
     "while"
     )
diff --git a/sc/Emacs.sc b/sc/Emacs.sc
index f9ed0bf..c0a0ab8 100644
--- a/sc/Emacs.sc
+++ b/sc/Emacs.sc
@@ -192,6 +192,12 @@ EmacsInterface {
 				[time, \error, e.errorString]
 			}
 		})
+		.put( \openDevSource, { | name |
+			var devpath = thisProcess.platform.devLoc( name );
+			//	devpath.postln;
+			Document.open( devpath ).front;
+			name -> devpath
+		});
 	}
 }