Wordpad integration (it's default installed on windows, handles \n, but no line numbers)

2007-12-05 01:21:52 -06:00 · 2007-12-05 01:21:52 -06:00 · adb540e485
parent 197d1e3d78
commit adb540e485
3 changed files with 15 additions and 0 deletions
--- a/extra/editors/wordpad/authors.txt
+++ b/extra/editors/wordpad/authors.txt
@ -0,0 +1 @@
+Doug Coleman
--- a/extra/editors/wordpad/summary.txt
+++ b/extra/editors/wordpad/summary.txt
@ -0,0 +1 @@
+Wordpad editor integration
--- a/extra/editors/wordpad/wordpad.factor
+++ b/extra/editors/wordpad/wordpad.factor
@ -0,0 +1,13 @@
+USING: editors hardware-info.windows io.launcher kernel
+math.parser namespaces sequences windows.shell32 ;
+IN: editors.wordpad
+
+: wordpad ( file line -- )
+    [
+        \ wordpad get-global % drop " " % %
+    ] "" make run-detached ;
+
+program-files "\\Windows NT\\Accessories\\wordpad.exe" append
+\ wordpad set-global
+
+[ wordpad ] edit-hook set-global