diff --git a/basis/editors/cot/authors.txt b/basis/editors/cot/authors.txt new file mode 100644 index 0000000000..e091bb8164 --- /dev/null +++ b/basis/editors/cot/authors.txt @@ -0,0 +1 @@ +John Benediktsson diff --git a/basis/editors/cot/cot.factor b/basis/editors/cot/cot.factor new file mode 100644 index 0000000000..cf4f26eec5 --- /dev/null +++ b/basis/editors/cot/cot.factor @@ -0,0 +1,16 @@ +USING: editors io.pathnames io.standard-paths kernel make +math.parser ; +IN: editors.cot + +SINGLETON: cot +cot editor-class set-global + +: find-cot-bundle-path ( -- path/f ) + "com.coteditor.CotEditor" find-native-bundle [ + "Contents/MacOS/cot" append-path + ] [ + f + ] if* ; + +M: cot editor-command ( file line -- command ) + [ find-cot-bundle-path , "-l" , # , ] { } make ; diff --git a/basis/editors/cot/summary.txt b/basis/editors/cot/summary.txt new file mode 100644 index 0000000000..d7c98d2664 --- /dev/null +++ b/basis/editors/cot/summary.txt @@ -0,0 +1 @@ +CotEditor integration diff --git a/basis/editors/cot/tags.txt b/basis/editors/cot/tags.txt new file mode 100644 index 0000000000..ebb74b4d5f --- /dev/null +++ b/basis/editors/cot/tags.txt @@ -0,0 +1 @@ +not loaded