From 0255f83be2776e3f56e76cea6e8a12b449a076b4 Mon Sep 17 00:00:00 2001
From: prunedtree <mew@.(none)>
Date: Fri, 21 Nov 2008 17:16:16 +0900
Subject: [PATCH] Committer: prunedtree

notepad2 integration
---
 basis/editors/notepad2/authors.txt     |  1 +
 basis/editors/notepad2/notepad2.factor | 16 ++++++++++++++++
 basis/editors/notepad2/summary.txt     |  1 +
 basis/editors/notepad2/tags.txt        |  1 +
 4 files changed, 19 insertions(+)
 create mode 100644 basis/editors/notepad2/authors.txt
 create mode 100644 basis/editors/notepad2/notepad2.factor
 create mode 100644 basis/editors/notepad2/summary.txt
 create mode 100644 basis/editors/notepad2/tags.txt

diff --git a/basis/editors/notepad2/authors.txt b/basis/editors/notepad2/authors.txt
new file mode 100644
index 0000000000..7852139357
--- /dev/null
+++ b/basis/editors/notepad2/authors.txt
@@ -0,0 +1 @@
+Marc Fauconneau
diff --git a/basis/editors/notepad2/notepad2.factor b/basis/editors/notepad2/notepad2.factor
new file mode 100644
index 0000000000..4d333e45dd
--- /dev/null
+++ b/basis/editors/notepad2/notepad2.factor
@@ -0,0 +1,16 @@
+USING: editors io.files io.launcher kernel math.parser
+namespaces sequences windows.shell32 make ;
+IN: editors.notepad2
+
+: notepad2-path ( -- str )
+    \ notepad2-path get-global [
+        program-files "C:\\Windows\\system32\\notepad.exe" append-path
+   ] unless* ;
+
+: notepad2 ( file line -- )
+    [
+        notepad2-path ,
+        "/g" , number>string , ,
+    ] { } make run-detached drop ;
+
+[ notepad2 ] edit-hook set-global
\ No newline at end of file
diff --git a/basis/editors/notepad2/summary.txt b/basis/editors/notepad2/summary.txt
new file mode 100644
index 0000000000..ab4a8ce377
--- /dev/null
+++ b/basis/editors/notepad2/summary.txt
@@ -0,0 +1 @@
+Notepad2 editor integration
diff --git a/basis/editors/notepad2/tags.txt b/basis/editors/notepad2/tags.txt
new file mode 100644
index 0000000000..6bf68304bb
--- /dev/null
+++ b/basis/editors/notepad2/tags.txt
@@ -0,0 +1 @@
+unportable