]> gitweb.factorcode.org Git - factor.git/commitdiff
add editors.gedit
authorerg <erg@ubuntubox.(none)>
Sat, 18 Apr 2009 06:43:40 +0000 (01:43 -0500)
committererg <erg@ubuntubox.(none)>
Sat, 18 Apr 2009 06:43:40 +0000 (01:43 -0500)
basis/editors/gedit/authors.txt [new file with mode: 0644]
basis/editors/gedit/gedit.factor [new file with mode: 0644]
basis/editors/gedit/summary.txt [new file with mode: 0644]
basis/editors/gedit/tags.txt [new file with mode: 0644]

diff --git a/basis/editors/gedit/authors.txt b/basis/editors/gedit/authors.txt
new file mode 100644 (file)
index 0000000..7c1b2f2
--- /dev/null
@@ -0,0 +1 @@
+Doug Coleman
diff --git a/basis/editors/gedit/gedit.factor b/basis/editors/gedit/gedit.factor
new file mode 100644 (file)
index 0000000..97ea0e1
--- /dev/null
@@ -0,0 +1,17 @@
+! Copyright (C) 2008 Doug Coleman.
+! See http://factorcode.org/license.txt for BSD license.
+USING: editors io.launcher kernel make math.parser namespaces
+sequences ;
+IN: editors.gedit
+
+: gedit-path ( -- path )
+    \ gedit-path get-global [
+        "gedit"
+    ] unless* ;
+
+: gedit ( file line -- )
+    [
+        gedit-path , number>string "+" prepend , ,
+    ] { } make run-detached drop ;
+
+[ gedit ] edit-hook set-global
diff --git a/basis/editors/gedit/summary.txt b/basis/editors/gedit/summary.txt
new file mode 100644 (file)
index 0000000..ebb7189
--- /dev/null
@@ -0,0 +1 @@
+gedit integration
diff --git a/basis/editors/gedit/tags.txt b/basis/editors/gedit/tags.txt
new file mode 100644 (file)
index 0000000..6bf6830
--- /dev/null
@@ -0,0 +1 @@
+unportable