summaryrefslogtreecommitdiff
path: root/amiga/dist
diff options
context:
space:
mode:
authorChris Young <chris@unsatisfactorysoftware.co.uk>2008-10-25 23:22:34 +0000
committerChris Young <chris@unsatisfactorysoftware.co.uk>2008-10-25 23:22:34 +0000
commit30b09368e7980def81ccfd7b4038225e7ec13ed9 (patch)
tree1f3859d4a17845ad03fd96789b8e74c421527d03 /amiga/dist
parent2f4beda48c9780739ecdab639b47299108265d66 (diff)
downloadnetsurf-30b09368e7980def81ccfd7b4038225e7ec13ed9.tar.gz
netsurf-30b09368e7980def81ccfd7b4038225e7ec13ed9.tar.bz2
Track the current/last used browser window (at the moment, just for ARexx).
Extended ARexx port. First two are primarily for openurl.library: * OPEN now takes a parameter NEW=NEWWINDOW/S to open the URL in a new window (default is to open in the current browser window) * TOFRONT will bring NetSurf's screen to the front (this may be extended in the future to bring the current browser window to the front - which might be better for when it is running on the WB screen) Next is to make it easy to support getvideo.rexx: * GETURL returns the URL of the current browser window in RESULT GetVideo.nsrx script will get the current URL and pass it to rexx:getvideo.rexx Currently there is no way to call ARexx scripts directly from NetSurf, or any way to specify whether to save, play or saveplay the video without editing the script. [clipboard.c/clipboard.h were missing from previous commit] svn path=/trunk/netsurf/; revision=5631
Diffstat (limited to 'amiga/dist')
-rwxr-xr-xamiga/dist/Rexx/GetVideo.nsrx26
1 files changed, 26 insertions, 0 deletions
diff --git a/amiga/dist/Rexx/GetVideo.nsrx b/amiga/dist/Rexx/GetVideo.nsrx
new file mode 100755
index 000000000..000286baf
--- /dev/null
+++ b/amiga/dist/Rexx/GetVideo.nsrx
@@ -0,0 +1,26 @@
+/*
+ * Copyright 2008 Chris Young <chris@unsatisfactorysoftware.co.uk>
+ *
+ * This file is part of NetSurf, http://www.netsurf-browser.org/
+ *
+ * NetSurf is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; version 2 of the License.
+ *
+ * NetSurf is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program. If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/* This script launches getvideo.rexx (Aminet:comm/www/getvideo.lha) */
+
+options results
+address netsurf
+
+geturl
+
+address REXX 'rexx:getvideo.rexx' result 'save "ram:"'