summaryrefslogtreecommitdiff
path: root/frontends/amiga/dist/Rexx/ShowTitles.nsrx
diff options
context:
space:
mode:
Diffstat (limited to 'frontends/amiga/dist/Rexx/ShowTitles.nsrx')
-rw-r--r--frontends/amiga/dist/Rexx/ShowTitles.nsrx18
1 files changed, 18 insertions, 0 deletions
diff --git a/frontends/amiga/dist/Rexx/ShowTitles.nsrx b/frontends/amiga/dist/Rexx/ShowTitles.nsrx
new file mode 100644
index 000000000..27de74122
--- /dev/null
+++ b/frontends/amiga/dist/Rexx/ShowTitles.nsrx
@@ -0,0 +1,18 @@
+/* Show all NetSurf windows and tabs open */
+
+options results
+address netsurf
+
+windows
+wins = result
+
+do w=1 to wins
+ windows window w
+ tabs = result
+ say "Window" w "(" || tabs "tabs)"
+
+ do t=1 to tabs
+ gettitle window w tab t
+ say " Tab" t || ":" result
+ end
+end