editors.geany: Add support.

diff --git a/basis/editors/geany/authors.txt b/basis/editors/geany/authors.txt
new file mode 100644 (file)
index 0000000..7c1b2f2
--- /dev/null
+++ b/basis/editors/geany/authors.txt
@@ -0,0 +1 @@
+Doug Coleman

diff --git a/basis/editors/geany/geany.factor b/basis/editors/geany/geany.factor
new file mode 100644 (file)
index 0000000..dfe1075
--- /dev/null
+++ b/basis/editors/geany/geany.factor
@@ -0,0 +1,19 @@
+! Copyright (C) 2013 Doug Coleman.
+! See http://factorcode.org/license.txt for BSD license.
+USING: editors fry kernel make math.parser namespaces system ;
+IN: editors.geany
+
+SINGLETON: geany
+geany editor-class set-global
+
+HOOK: geany-path os ( -- path )
+
+M: unix geany-path
+    \ geany-path get-global [ "geany" ] unless* ;
+
+M: geany editor-command
+    '[
+        geany-path ,
+        _ ,
+        "--line" , _ number>string ,
+    ] { } make ;
\ No newline at end of file