From: Dave Carlton <davec@mac.com>
Date: Fri, 12 Aug 2022 13:50:55 +0000 (-0500)
Subject: Added aquamacs editor
X-Git-Tag: 0.99~1090
X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=commitdiff_plain;h=a4b253f94a4bbcfe43260ddf9206c9d8784e0427

Added aquamacs editor

(cherry picked from commit 14c0a2f30235c69322a61aa3b4fc992fd09ce70b)
(cherry picked from commit e638daddbe3cd9bbeef4c8cfaf37e319680bb48c)
---

diff --git a/basis/editors/aquamacs/aquamacs.factor b/basis/editors/aquamacs/aquamacs.factor
new file mode 100644
index 0000000000..b058d762a1
--- /dev/null
+++ b/basis/editors/aquamacs/aquamacs.factor
@@ -0,0 +1,27 @@
+! File: aquamacs.factor
+! Version: 0.1
+! DRI: Dave Carlton
+! Description: Another fine Factor file!
+! Copyright (C) 2017 Dave Carlton.
+! See http://factorcode.org/license.txt for BSD license.
+
+USING: combinators.short-circuit editors io.standard-paths
+kernel make math.parser namespaces sequences system ;
+IN: editors.aquamacs
+
+SINGLETON: aquamacs
+aquamacs editor-class set-global
+
+HOOK: find-aquamacs os ( -- path )
+
+M: object find-aquamacs ( -- path )
+    "aquamacs" ?find-in-path ;
+
+M: aquamacs editor-command ( file line -- command )
+    drop
+    [
+        "/Applications/Aquamacs.app/Contents/MacOS/bin/aquamacs" ,
+        ,
+    ] { } make
+    ;
+
diff --git a/basis/editors/aquamacs/authors.txt b/basis/editors/aquamacs/authors.txt
new file mode 100644
index 0000000000..0c9e056e62
--- /dev/null
+++ b/basis/editors/aquamacs/authors.txt
@@ -0,0 +1 @@
+Dave Carlton