editors: allow them to be loaded in the load-all image

diff --git a/basis/editors/acme/acme.factor b/basis/editors/acme/acme.factor
index ea476f6dfdfdfb50b4b525bf51c58461137eb092..4f6580eae1f0d305871399e2e7fbeb71aa9c8055 100644 (file)
--- a/basis/editors/acme/acme.factor
+++ b/basis/editors/acme/acme.factor
@@ -5,7 +5,8 @@ kernel make math.parser namespaces sequences ;
 IN: editors.acme
 
 SINGLETON: acme
-acme editor-class set-global
+
+editor-class [ acme ] initialize
 
 : plan9-path ( -- path )
   \ plan9-path get [

diff --git a/basis/editors/acme/tags.txt b/basis/editors/acme/tags.txt
deleted file mode 100644 (file)
index ebb74b4..0000000
--- a/basis/editors/acme/tags.txt
+++ /dev/null
@@ -1 +0,0 @@
-not loaded

diff --git a/basis/editors/atom/atom.factor b/basis/editors/atom/atom.factor
index 904aceb94eba5eb615bfe327be3c5183012ab498..bf870a5f3a6b75795046be9bd77e4f2946f10d51 100644 (file)
--- a/basis/editors/atom/atom.factor
+++ b/basis/editors/atom/atom.factor
@@ -5,7 +5,8 @@ math.parser namespaces sequences system ;
 IN: editors.atom
 
 SINGLETON: atom
-atom editor-class set-global
+
+editor-class [ atom ] initialize
 
 SYMBOL: atom-path
 

diff --git a/basis/editors/atom/tags.txt b/basis/editors/atom/tags.txt
deleted file mode 100644 (file)
index ebb74b4..0000000
--- a/basis/editors/atom/tags.txt
+++ /dev/null
@@ -1 +0,0 @@
-not loaded

diff --git a/basis/editors/bbedit/bbedit.factor b/basis/editors/bbedit/bbedit.factor
index baeccc8528d6764ecbc6fb8c4a02c5c9036e0b39..8de2b9d555d90dcc6d5e14ad62d6afad5f7cd0cb 100644 (file)
--- a/basis/editors/bbedit/bbedit.factor
+++ b/basis/editors/bbedit/bbedit.factor
@@ -2,7 +2,8 @@ USING: editors kernel make namespaces ;
 IN: editors.bbedit
 
 SINGLETON: bbedit
-bbedit editor-class set-global
+
+editor-class [ bbedit ] initialize
 
 M: bbedit editor-command
     drop

diff --git a/basis/editors/brackets/brackets.factor b/basis/editors/brackets/brackets.factor
index e6ef60561ce93a9bb5f72b5a1d0294d4b8e10b01..83621f3d76e734c249b2f3534b115a282de19893 100644 (file)
--- a/basis/editors/brackets/brackets.factor
+++ b/basis/editors/brackets/brackets.factor
@@ -5,7 +5,8 @@ namespaces system vocabs ;
 IN: editors.brackets
 
 SINGLETON: brackets
-brackets editor-class set-global
+
+editor-class [ brackets ] initialize
 
 HOOK: brackets-path os ( -- path )
 

diff --git a/basis/editors/coteditor/coteditor.factor b/basis/editors/coteditor/coteditor.factor
index af0507f68dac7c02527e66b3f82dd30eb455fe36..241bdc98b1031cb0f70f0e3780126f385b721c70 100644 (file)
--- a/basis/editors/coteditor/coteditor.factor
+++ b/basis/editors/coteditor/coteditor.factor
@@ -3,7 +3,8 @@ math.parser namespaces ;
 IN: editors.coteditor
 
 SINGLETON: coteditor
-coteditor editor-class set-global
+
+editor-class [ coteditor ] initialize
 
 : find-cot-bundle-path ( -- path/f )
     "com.coteditor.CotEditor" find-native-bundle [

diff --git a/basis/editors/coteditor/tags.txt b/basis/editors/coteditor/tags.txt
deleted file mode 100644 (file)
index ebb74b4..0000000
--- a/basis/editors/coteditor/tags.txt
+++ /dev/null
@@ -1 +0,0 @@
-not loaded

diff --git a/basis/editors/editpadlite/editpadlite.factor b/basis/editors/editpadlite/editpadlite.factor
index bf96457fd2c47bcabb4af6186d449e56a18a2262..9575b6e78bc75d3cefd74f12e9ae27e7e99bae08 100644 (file)
--- a/basis/editors/editpadlite/editpadlite.factor
+++ b/basis/editors/editpadlite/editpadlite.factor
@@ -3,7 +3,8 @@ kernel make namespaces ;
 IN: editors.editpadlite
 
 SINGLETON: editpadlite
-editpadlite editor-class set-global
+
+editor-class [ editpadlite ] initialize
 
 : editpadlite-path ( -- path )
     \ editpadlite-path get [

diff --git a/basis/editors/editpadlite/tags.txt b/basis/editors/editpadlite/tags.txt
deleted file mode 100644 (file)
index ebb74b4..0000000
--- a/basis/editors/editpadlite/tags.txt
+++ /dev/null
@@ -1 +0,0 @@
-not loaded

diff --git a/basis/editors/editpadpro/editpadpro.factor b/basis/editors/editpadpro/editpadpro.factor
index 6e85490a9861647205d3feccfa25a7d2652128dc..4ce9aaca843d4abdfcfff0760305f48b609a5222 100644 (file)
--- a/basis/editors/editpadpro/editpadpro.factor
+++ b/basis/editors/editpadpro/editpadpro.factor
@@ -3,7 +3,8 @@ kernel make math.parser namespaces sequences ;
 IN: editors.editpadpro
 
 SINGLETON: editpadpro
-editpadpro editor-class set-global
+
+editor-class [ editpadpro ] initialize
 
 : editpadpro-path ( -- path )
     \ editpadpro-path get [

diff --git a/basis/editors/editpadpro/tags.txt b/basis/editors/editpadpro/tags.txt
deleted file mode 100644 (file)
index ebb74b4..0000000
--- a/basis/editors/editpadpro/tags.txt
+++ /dev/null
@@ -1 +0,0 @@
-not loaded

diff --git a/basis/editors/editplus/editplus.factor b/basis/editors/editplus/editplus.factor
index db203e2abd312c0ff2d2291eaf37d299bb32a12a..8c38eee1857d0dea6d1dcf568d1dac4b9a37aa35 100644 (file)
--- a/basis/editors/editplus/editplus.factor
+++ b/basis/editors/editplus/editplus.factor
@@ -3,7 +3,8 @@ namespaces ;
 IN: editors.editplus
 
 SINGLETON: editplus
-editplus editor-class set-global
+
+editor-class [ editplus ] initialize
 
 : editplus-path ( -- path )
     \ editplus-path get [

diff --git a/basis/editors/editplus/tags.txt b/basis/editors/editplus/tags.txt
deleted file mode 100644 (file)
index ebb74b4..0000000
--- a/basis/editors/editplus/tags.txt
+++ /dev/null
@@ -1 +0,0 @@
-not loaded

diff --git a/basis/editors/emacs/emacs.factor b/basis/editors/emacs/emacs.factor
index dea14c90200e8f070bf5192609b7ae041b7c80a2..f1b12b6211629af9cb57a87c415d7785ebdd892b 100644 (file)
--- a/basis/editors/emacs/emacs.factor
+++ b/basis/editors/emacs/emacs.factor
@@ -3,7 +3,8 @@ kernel make math.parser namespaces sequences system ;
 IN: editors.emacs
 
 SINGLETON: emacs
-emacs editor-class set-global
+
+editor-class [ emacs ] initialize
 
 SYMBOL: emacsclient-path
 SYMBOL: emacsclient-args

diff --git a/basis/editors/emacs/tags.txt b/basis/editors/emacs/tags.txt
deleted file mode 100644 (file)
index ebb74b4..0000000
--- a/basis/editors/emacs/tags.txt
+++ /dev/null
@@ -1 +0,0 @@
-not loaded

diff --git a/basis/editors/emeditor/emeditor.factor b/basis/editors/emeditor/emeditor.factor
index fe5ee1c7251eea81b024e86982baab2054b86b8c..deb916bc26c2f204f624ee4ac63e67b63f05dcde 100644 (file)
--- a/basis/editors/emeditor/emeditor.factor
+++ b/basis/editors/emeditor/emeditor.factor
@@ -3,7 +3,8 @@ namespaces ;
 IN: editors.emeditor
 
 SINGLETON: emeditor
-emeditor editor-class set-global
+
+editor-class [ emeditor ] initialize
 
 : emeditor-path ( -- path )
     \ emeditor-path get [

diff --git a/basis/editors/emeditor/tags.txt b/basis/editors/emeditor/tags.txt
deleted file mode 100644 (file)
index ebb74b4..0000000
--- a/basis/editors/emeditor/tags.txt
+++ /dev/null
@@ -1 +0,0 @@
-not loaded

diff --git a/basis/editors/etexteditor/etexteditor.factor b/basis/editors/etexteditor/etexteditor.factor
index 75e8a2252f3fd5e55408ebd150781b06e79a4ff8..31bd74405aa560b639c155ef9045fad71ea63fe4 100644 (file)
--- a/basis/editors/etexteditor/etexteditor.factor
+++ b/basis/editors/etexteditor/etexteditor.factor
@@ -5,7 +5,8 @@ namespaces ;
 IN: editors.etexteditor
 
 SINGLETON: etexteditor
-etexteditor editor-class set-global
+
+editor-class [ etexteditor ] initialize
 
 : etexteditor-path ( -- str )
     \ etexteditor-path get [

diff --git a/basis/editors/etexteditor/tags.txt b/basis/editors/etexteditor/tags.txt
deleted file mode 100644 (file)
index ebb74b4..0000000
--- a/basis/editors/etexteditor/tags.txt
+++ /dev/null
@@ -1 +0,0 @@
-not loaded

diff --git a/basis/editors/geany/geany.factor b/basis/editors/geany/geany.factor
index 005fa94cb566f69ee6cae28bccfed3bdcb1444ea..930c4096cdd8d40a1806608c977baeb2b3b51111 100644 (file)
--- a/basis/editors/geany/geany.factor
+++ b/basis/editors/geany/geany.factor
@@ -5,7 +5,8 @@ kernel make math.parser namespaces system ;
 IN: editors.geany
 
 SINGLETON: geany
-geany editor-class set-global
+
+editor-class [ geany ] initialize
 
 SYMBOL: geany-path
 

diff --git a/basis/editors/gedit/gedit.factor b/basis/editors/gedit/gedit.factor
index 117802001eed74780ac0397b9b807cf32c79d98a..ba4a33775af516f4982343b09ffc60b37ad3d75e 100644 (file)
--- a/basis/editors/gedit/gedit.factor
+++ b/basis/editors/gedit/gedit.factor
@@ -5,7 +5,8 @@ math.parser namespaces sequences ;
 IN: editors.gedit
 
 SINGLETON: gedit
-gedit editor-class set-global
+
+editor-class [ gedit ] initialize
 
 : gedit-path ( -- path )
     \ gedit-path get [

diff --git a/basis/editors/gedit/tags.txt b/basis/editors/gedit/tags.txt
deleted file mode 100644 (file)
index ebb74b4..0000000
--- a/basis/editors/gedit/tags.txt
+++ /dev/null
@@ -1 +0,0 @@
-not loaded

diff --git a/basis/editors/gvim/gvim.factor b/basis/editors/gvim/gvim.factor
index e776437ce16c469ddd1a2c83982facafff331c9b..756fdcc7224765167e6b9effe1519b40c4fb18c0 100644 (file)
--- a/basis/editors/gvim/gvim.factor
+++ b/basis/editors/gvim/gvim.factor
@@ -6,7 +6,8 @@ IN: editors.gvim
 ! more information.
 
 TUPLE: gvim < vim ;
-T{ gvim } editor-class set-global
+
+editor-class [ T{ gvim } ] initialize
 
 HOOK: find-gvim-path io-backend ( -- path )
 

diff --git a/basis/editors/gvim/tags.txt b/basis/editors/gvim/tags.txt
deleted file mode 100644 (file)
index ebb74b4..0000000
--- a/basis/editors/gvim/tags.txt
+++ /dev/null
@@ -1 +0,0 @@
-not loaded

diff --git a/basis/editors/jedit/jedit.factor b/basis/editors/jedit/jedit.factor
index c6544d534cbd9d2285b7818c6a68207e4a4247d9..b5ec708be1469cbfba50841d2943b18cf078eeb0 100644 (file)
--- a/basis/editors/jedit/jedit.factor
+++ b/basis/editors/jedit/jedit.factor
@@ -6,7 +6,8 @@ system ;
 IN: editors.jedit
 
 SINGLETON: jedit
-jedit editor-class set-global
+
+editor-class [ jedit ] initialize
 
 HOOK: find-jedit-path os ( -- path )
 

diff --git a/basis/editors/jedit/tags.txt b/basis/editors/jedit/tags.txt
deleted file mode 100644 (file)
index ebb74b4..0000000
--- a/basis/editors/jedit/tags.txt
+++ /dev/null
@@ -1 +0,0 @@
-not loaded

diff --git a/basis/editors/macvim/macvim.factor b/basis/editors/macvim/macvim.factor
index ba3726b6aaf996d13e2ab5f25295c4f859435ea1..ef4427fb901f9604c614f37cf768f1b4dfeee734 100644 (file)
--- a/basis/editors/macvim/macvim.factor
+++ b/basis/editors/macvim/macvim.factor
@@ -3,7 +3,8 @@ namespaces ;
 IN: editors.macvim
 
 TUPLE: macvim < vim ;
-T{ macvim } editor-class set-global
+
+editor-class [ T{ macvim } ] initialize
 
 : find-macvim-bundle-path ( -- path/f )
     "org.vim.MacVim" find-native-bundle [

diff --git a/basis/editors/macvim/tags.txt b/basis/editors/macvim/tags.txt
deleted file mode 100644 (file)
index ebb74b4..0000000
--- a/basis/editors/macvim/tags.txt
+++ /dev/null
@@ -1 +0,0 @@
-not loaded

diff --git a/basis/editors/notepad++/notepad++.factor b/basis/editors/notepad++/notepad++.factor
index 0a3085ec4246be2b54f498a1791046f1b0505943..daae4beb085ded9640644d9dc88e1cac04762832 100644 (file)
--- a/basis/editors/notepad++/notepad++.factor
+++ b/basis/editors/notepad++/notepad++.factor
@@ -3,7 +3,8 @@ namespaces sequences ;
 IN: editors.notepad++
 
 SINGLETON: notepad++
-notepad++ editor-class set-global
+
+editor-class [ notepad++ ] initialize
 
 : notepad++-path ( -- path )
     \ notepad++-path get [

diff --git a/basis/editors/notepad++/tags.txt b/basis/editors/notepad++/tags.txt
deleted file mode 100644 (file)
index ebb74b4..0000000
--- a/basis/editors/notepad++/tags.txt
+++ /dev/null
@@ -1 +0,0 @@
-not loaded

diff --git a/basis/editors/notepad/notepad.factor b/basis/editors/notepad/notepad.factor
index b60b878b8124e4fbbb9b1fd590d870c6ed5bd0e7..cc672ebc2410038da98102774d06a4920f548daa 100644 (file)
--- a/basis/editors/notepad/notepad.factor
+++ b/basis/editors/notepad/notepad.factor
@@ -6,7 +6,8 @@ sequences windows.shell32 ;
 IN: editors.notepad
 
 SINGLETON: notepad
-notepad editor-class set-global
+
+editor-class [ notepad ] initialize
 
 : notepad-path ( -- path )
     \ notepad-path get [

diff --git a/basis/editors/notepad/tags.txt b/basis/editors/notepad/tags.txt
deleted file mode 100644 (file)
index ebb74b4..0000000
--- a/basis/editors/notepad/tags.txt
+++ /dev/null
@@ -1 +0,0 @@
-not loaded

diff --git a/basis/editors/notepad2/notepad2.factor b/basis/editors/notepad2/notepad2.factor
index 9c9f90a0d9242a2533632d7b642f4df0d3f913d8..4f5b857385ce5d9df0d65f87f6aa706797e45c77 100644 (file)
--- a/basis/editors/notepad2/notepad2.factor
+++ b/basis/editors/notepad2/notepad2.factor
@@ -3,7 +3,8 @@ namespaces sequences windows.shell32 make io.pathnames ;
 IN: editors.notepad2
 
 SINGLETON: notepad2
-notepad2 editor-class set-global
+
+editor-class [ notepad2 ] initialize
 
 : notepad2-path ( -- path )
     \ notepad2-path get [

diff --git a/basis/editors/notepad2/tags.txt b/basis/editors/notepad2/tags.txt
deleted file mode 100644 (file)
index ebb74b4..0000000
--- a/basis/editors/notepad2/tags.txt
+++ /dev/null
@@ -1 +0,0 @@
-not loaded

diff --git a/basis/editors/nova/nova.factor b/basis/editors/nova/nova.factor
index 3f065c16587d799251a8bff9ec9f36ad03158e0a..db7da54a2d047b7e18b8c6b24567a109d8a9a90d 100644 (file)
--- a/basis/editors/nova/nova.factor
+++ b/basis/editors/nova/nova.factor
@@ -2,7 +2,8 @@ USING: editors kernel make namespaces ;
 IN: editors.nova
 
 SINGLETON: nova
-nova editor-class set-global
+
+editor-class [ nova ] initialize
 
 M: nova editor-command
     drop

diff --git a/basis/editors/scite/scite.factor b/basis/editors/scite/scite.factor
index e58229ab146e038b29a00a6341ae6bd38d586346..27fd305f811f5bd6f4194400bdffdb5260ff0c7a 100644 (file)
--- a/basis/editors/scite/scite.factor
+++ b/basis/editors/scite/scite.factor
@@ -6,7 +6,8 @@ namespaces sequences system ;
 IN: editors.scite
 
 SINGLETON: scite
-scite editor-class set-global
+
+editor-class [ scite ] initialize
 
 SYMBOL: scite-path
 

diff --git a/basis/editors/scite/tags.txt b/basis/editors/scite/tags.txt
deleted file mode 100644 (file)
index ebb74b4..0000000
--- a/basis/editors/scite/tags.txt
+++ /dev/null
@@ -1 +0,0 @@
-not loaded

diff --git a/basis/editors/smultron/smultron.factor b/basis/editors/smultron/smultron.factor
index 1c1688fd0db8dfbc98c8d5a5380d31598ece6b93..0720d948019616e54e091e1fa3480897f6dd7a39 100644 (file)
--- a/basis/editors/smultron/smultron.factor
+++ b/basis/editors/smultron/smultron.factor
@@ -2,7 +2,8 @@ USING: editors kernel make namespaces ;
 IN: editors.smultron
 
 SINGLETON: smultron
-smultron editor-class set-global
+
+editor-class [ smultron ] initialize
 
 M: smultron editor-command
     drop

diff --git a/basis/editors/subethaedit/subethaedit.factor b/basis/editors/subethaedit/subethaedit.factor
index aa1b5f835e868a2511359ef5a3cd54414ebb7fca..9cc90ea1a3d357d342a754045151eecca6240edc 100644 (file)
--- a/basis/editors/subethaedit/subethaedit.factor
+++ b/basis/editors/subethaedit/subethaedit.factor
@@ -3,7 +3,8 @@ namespaces prettyprint editors make ;
 IN: editors.subethaedit
 
 SINGLETON: subethaedit
-subethaedit editor-class set-global
+
+editor-class [ subethaedit ] initialize
 
 M: subethaedit editor-command
     drop

diff --git a/basis/editors/subethaedit/tags.txt b/basis/editors/subethaedit/tags.txt
deleted file mode 100644 (file)
index ebb74b4..0000000
--- a/basis/editors/subethaedit/tags.txt
+++ /dev/null
@@ -1 +0,0 @@
-not loaded

diff --git a/basis/editors/sublime/sublime.factor b/basis/editors/sublime/sublime.factor
index a457ded4feb004c8a8c2cb67a38dd995b4068fa5..bf744dfcba7ab4cdfb6e1af688afae5b8f75c7ee 100644 (file)
--- a/basis/editors/sublime/sublime.factor
+++ b/basis/editors/sublime/sublime.factor
@@ -6,7 +6,8 @@ system ;
 IN: editors.sublime
 
 SINGLETON: sublime
-sublime editor-class set-global
+
+editor-class [ sublime ] initialize
 
 HOOK: find-sublime-path os ( -- path )
 

diff --git a/basis/editors/ted-notepad/tags.txt b/basis/editors/ted-notepad/tags.txt
deleted file mode 100644 (file)
index ebb74b4..0000000
--- a/basis/editors/ted-notepad/tags.txt
+++ /dev/null
@@ -1 +0,0 @@
-not loaded

diff --git a/basis/editors/ted-notepad/ted-notepad.factor b/basis/editors/ted-notepad/ted-notepad.factor
index fe1ce8478f3ccf953704f2c37c29316ae653ab1b..0dca51e2031dc14ccfcd748a193248082da9dd56 100644 (file)
--- a/basis/editors/ted-notepad/ted-notepad.factor
+++ b/basis/editors/ted-notepad/ted-notepad.factor
@@ -3,7 +3,8 @@ math.parser namespaces sequences make ;
 IN: editors.ted-notepad
 
 SINGLETON: ted-notepad
-ted-notepad editor-class set-global
+
+editor-class [ ted-notepad ] initialize
 
 : ted-notepad-path ( -- path )
     \ ted-notepad-path get [

diff --git a/basis/editors/textadept/tags.txt b/basis/editors/textadept/tags.txt
deleted file mode 100644 (file)
index ebb74b4..0000000
--- a/basis/editors/textadept/tags.txt
+++ /dev/null
@@ -1 +0,0 @@
-not loaded

diff --git a/basis/editors/textadept/textadept.factor b/basis/editors/textadept/textadept.factor
index 1edfbdcf4f35e3b059390f47a6e6afb62583aa07..8ba969cc27229af00e0fc44007aa75dfc656f665 100644 (file)
--- a/basis/editors/textadept/textadept.factor
+++ b/basis/editors/textadept/textadept.factor
@@ -15,7 +15,8 @@ namespaces sequences system vocabs ;
 IN: editors.textadept
 
 SINGLETON: textadept
-textadept editor-class set-global
+
+editor-class [ textadept ] initialize
 
 HOOK: find-textadept-path os ( -- path )
 

diff --git a/basis/editors/textedit/tags.txt b/basis/editors/textedit/tags.txt
deleted file mode 100644 (file)
index ebb74b4..0000000
--- a/basis/editors/textedit/tags.txt
+++ /dev/null
@@ -1 +0,0 @@
-not loaded

diff --git a/basis/editors/textedit/textedit.factor b/basis/editors/textedit/textedit.factor
index 9c0c50cc7b523e0043d0b1ca42d58f66c0e52b33..5d7055ac30806ead119ea21468208cf123d0132e 100644 (file)
--- a/basis/editors/textedit/textedit.factor
+++ b/basis/editors/textedit/textedit.factor
@@ -3,7 +3,8 @@ namespaces prettyprint editors make ;
 IN: editors.textedit
 
 SINGLETON: textedit
-textedit editor-class set-global
+
+editor-class [ textedit ] initialize
 
 M: textedit editor-command
     drop

diff --git a/basis/editors/textmate/tags.txt b/basis/editors/textmate/tags.txt
deleted file mode 100644 (file)
index ebb74b4..0000000
--- a/basis/editors/textmate/tags.txt
+++ /dev/null
@@ -1 +0,0 @@
-not loaded

diff --git a/basis/editors/textmate/textmate.factor b/basis/editors/textmate/textmate.factor
index 8dd5dc1b9ac51ee8694011913b12e01c763699a2..e7610d1b96bda389104154cfcf1910dbb68a5fde 100644 (file)
--- a/basis/editors/textmate/textmate.factor
+++ b/basis/editors/textmate/textmate.factor
@@ -3,7 +3,8 @@ namespaces prettyprint editors make ;
 IN: editors.textmate
 
 SINGLETON: textmate
-textmate editor-class set-global
+
+editor-class [ textmate ] initialize
 
 M: textmate editor-command
     [ "mate" , "-a" , "-l" , number>string , , ] { } make ;

diff --git a/basis/editors/textpad/tags.txt b/basis/editors/textpad/tags.txt
deleted file mode 100644 (file)
index ebb74b4..0000000
--- a/basis/editors/textpad/tags.txt
+++ /dev/null
@@ -1 +0,0 @@
-not loaded

diff --git a/basis/editors/textpad/textpad.factor b/basis/editors/textpad/textpad.factor
index 62cb493d1b3a586bf0646babbda39ada4d97348f..025928d89657c1e67ed02757f43e8417e7c50177 100644 (file)
--- a/basis/editors/textpad/textpad.factor
+++ b/basis/editors/textpad/textpad.factor
@@ -3,7 +3,8 @@ namespaces sequences ;
 IN: editors.textpad
 
 SINGLETON: textpad
-textpad editor-class set-global
+
+editor-class [ textpad ] initialize
 
 : textpad-path ( -- path )
     \ textpad-path get-global [

diff --git a/basis/editors/textwrangler/tags.txt b/basis/editors/textwrangler/tags.txt
deleted file mode 100644 (file)
index ebb74b4..0000000
--- a/basis/editors/textwrangler/tags.txt
+++ /dev/null
@@ -1 +0,0 @@
-not loaded

diff --git a/basis/editors/textwrangler/textwrangler.factor b/basis/editors/textwrangler/textwrangler.factor
index d95eae9f51b9984345f77b6315ed0bea014d9858..f16b9afa45d151750ff8f545b73c9841faafc801 100644 (file)
--- a/basis/editors/textwrangler/textwrangler.factor
+++ b/basis/editors/textwrangler/textwrangler.factor
@@ -12,7 +12,8 @@ IN: editors.textwrangler
 ! Note that launching with ``open -a`` does not support line numbers.
 
 SINGLETON: textwrangler
-textwrangler editor-class set-global
+
+editor-class [ textwrangler ] initialize
 
 M: textwrangler editor-command
     "edit" find-in-path [

diff --git a/basis/editors/ui/ui.factor b/basis/editors/ui/ui.factor
index 81747033368f59ae7d3b2ec810ccc25256c02679..631c2f68b1c5c58c41af8feb5decf4e27338105f 100644 (file)
--- a/basis/editors/ui/ui.factor
+++ b/basis/editors/ui/ui.factor
@@ -1,12 +1,17 @@
 ! Copyright (C) 2018 Doug Coleman.
 ! See http://factorcode.org/license.txt for BSD license.
-USING: accessors editors kernel sequences ui ui.gadgets
-ui.gadgets.borders ui.gadgets.buttons ui.gadgets.packs
-ui.gadgets.scrollers ui.tools.listener vocabs.loader ;
+USING: accessors editors kernel namespaces sequences ui
+ui.gadgets ui.gadgets.borders ui.gadgets.buttons
+ui.gadgets.packs ui.gadgets.scrollers ui.tools.listener
+vocabs.loader ;
 IN: editors.ui
 
 : <reload-editor-button> ( editor -- button )
-    dup '[ drop [ _ reload ] \ run call-listener ] <border-button> ;
+    dup '[
+        drop
+        [ f editor-class set-global _ reload ]
+        \ run call-listener
+    ] <border-button> ;
 
 : <editor-reloader> ( -- gadget )
     <filled-pile> { 2 2 } >>gap available-editors

diff --git a/basis/editors/ultraedit/tags.txt b/basis/editors/ultraedit/tags.txt
deleted file mode 100644 (file)
index ebb74b4..0000000
--- a/basis/editors/ultraedit/tags.txt
+++ /dev/null
@@ -1 +0,0 @@
-not loaded

diff --git a/basis/editors/ultraedit/ultraedit.factor b/basis/editors/ultraedit/ultraedit.factor
index 539123aad5d3f6bfc4470c263589da6bc5cc51eb..970a10353cda3be8fedeb385eaf42a6c2b4b423c 100644 (file)
--- a/basis/editors/ultraedit/ultraedit.factor
+++ b/basis/editors/ultraedit/ultraedit.factor
@@ -3,7 +3,8 @@ math.parser namespaces system ;
 IN: editors.ultraedit
 
 SINGLETON: ultraedit
-ultraedit editor-class set-global
+
+editor-class [ ultraedit ] initialize
 
 HOOK: find-ultraedit os ( -- path )
 

diff --git a/basis/editors/vim/tags.txt b/basis/editors/vim/tags.txt
deleted file mode 100644 (file)
index ebb74b4..0000000
--- a/basis/editors/vim/tags.txt
+++ /dev/null
@@ -1 +0,0 @@
-not loaded

diff --git a/basis/editors/vim/vim.factor b/basis/editors/vim/vim.factor
index 79618ac08b0a577899d12f8e36be67d4daba0c30..39d20c41d1bb0efc7b326a96b10761585d73effb 100644 (file)
--- a/basis/editors/vim/vim.factor
+++ b/basis/editors/vim/vim.factor
@@ -3,7 +3,8 @@ namespaces sequences strings ;
 IN: editors.vim
 
 TUPLE: vim ;
-T{ vim } editor-class set-global
+
+editor-class [ T{ vim } ] initialize
 
 SYMBOL: vim-path
 

diff --git a/basis/editors/visual-studio-code-exploration/visual-studio-code-exploration.factor b/basis/editors/visual-studio-code-exploration/visual-studio-code-exploration.factor
index a503b358b58ac48ca4561a145a87a842600f6a61..0d507f9aa9b3fde1f63d37c1e14b55d70f36951b 100644 (file)
--- a/basis/editors/visual-studio-code-exploration/visual-studio-code-exploration.factor
+++ b/basis/editors/visual-studio-code-exploration/visual-studio-code-exploration.factor
@@ -7,7 +7,7 @@ IN: editors.visual-studio-code-exploration
 
 TUPLE: visual-studio-code-exploration < visual-studio-code ;
 
-T{ visual-studio-code-exploration } editor-class set-global
+editor-class [ T{ visual-studio-code-exploration } ] initialize
 
 M: visual-studio-code-exploration find-visual-studio-code-path
     os {

diff --git a/basis/editors/visual-studio-code-insiders/visual-studio-code-insiders.factor b/basis/editors/visual-studio-code-insiders/visual-studio-code-insiders.factor
index deffec04829a10c03336d32a8264b6d95a9dd748..48678de0966627e1221382ddcf809f714c909b17 100644 (file)
--- a/basis/editors/visual-studio-code-insiders/visual-studio-code-insiders.factor
+++ b/basis/editors/visual-studio-code-insiders/visual-studio-code-insiders.factor
@@ -7,7 +7,7 @@ IN: editors.visual-studio-code-insiders
 
 TUPLE: visual-studio-code-insiders < visual-studio-code ;
 
-T{ visual-studio-code-insiders } editor-class set-global
+editor-class [ T{ visual-studio-code-insiders } ] initialize
 
 M: visual-studio-code-insiders find-visual-studio-code-path
     os {

diff --git a/basis/editors/visual-studio-code/visual-studio-code.factor b/basis/editors/visual-studio-code/visual-studio-code.factor
index 867a3c42e6204782e1658ece00392178830dc37b..70880e99e9e240d41b680b075e1edc7e1fcd1097 100644 (file)
--- a/basis/editors/visual-studio-code/visual-studio-code.factor
+++ b/basis/editors/visual-studio-code/visual-studio-code.factor
@@ -9,7 +9,8 @@ IN: editors.visual-studio-code
 ! https://code.visualstudio.com/docs/editor/command-line
 
 TUPLE: visual-studio-code ;
-T{ visual-studio-code } editor-class set-global
+
+editor-class [ T{ visual-studio-code } ] initialize
 
 HOOK: find-visual-studio-code-path editor-class ( -- path )
 

diff --git a/basis/editors/visual-studio-codium/visual-studio-codium.factor b/basis/editors/visual-studio-codium/visual-studio-codium.factor
index a47975b5d11a69c01d79f2c7075f597338c9c8bf..923001c3753bdfd339d797d851503d90e418376c 100644 (file)
--- a/basis/editors/visual-studio-codium/visual-studio-codium.factor
+++ b/basis/editors/visual-studio-codium/visual-studio-codium.factor
@@ -7,7 +7,7 @@ IN: editors.visual-studio-codium
 
 TUPLE: visual-studio-codium < visual-studio-code ;
 
-T{ visual-studio-codium } editor-class set-global
+editor-class [ T{ visual-studio-codium } ] initialize
 
 M: visual-studio-codium find-visual-studio-code-path
     os {

diff --git a/basis/editors/wordpad/tags.txt b/basis/editors/wordpad/tags.txt
deleted file mode 100644 (file)
index ebb74b4..0000000
--- a/basis/editors/wordpad/tags.txt
+++ /dev/null
@@ -1 +0,0 @@
-not loaded

diff --git a/basis/editors/wordpad/wordpad.factor b/basis/editors/wordpad/wordpad.factor
index 3245e0cfd8e4babc08571aecf324f6bcfe20eaed..6d8fa4835c537ed71a4c62e65b87e3c8bd050802 100644 (file)
--- a/basis/editors/wordpad/wordpad.factor
+++ b/basis/editors/wordpad/wordpad.factor
@@ -2,7 +2,8 @@ USING: arrays editors io.standard-paths kernel namespaces ;
 IN: editors.wordpad
 
 SINGLETON: wordpad
-wordpad editor-class set-global
+
+editor-class [ wordpad ] initialize
 
 : wordpad-path ( -- path )
     \ wordpad-path get [

diff --git a/basis/editors/xcode/xcode.factor b/basis/editors/xcode/xcode.factor
index 0e0da1906144e65507b7f9bbc863c34445d207ba..b694e2fc1dd6ca49fa4d3eaecedeafe4f1df1c47 100644 (file)
--- a/basis/editors/xcode/xcode.factor
+++ b/basis/editors/xcode/xcode.factor
@@ -2,7 +2,8 @@ USING: editors kernel make namespaces ;
 IN: editors.xcode
 
 SINGLETON: xcode
-xcode editor-class set-global
+
+editor-class [ xcode ] initialize
 
 M: xcode editor-command
     drop