blob: a24f84a51a80c2cbb2e268e8ab13b4c14a2be415 (plain
* Copyright 2008 Chris Young <email@example.com>
* 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) */
if open('getvideo','rexx:getvideo.rexx','R') then do
address REXX 'rexx:getvideo.rexx' result 'ask "ram:"'
address command 'requestchoice >NIL: "NetSurf" "GetVideo.rexx must be installed in REXX: for this script to function.*n*nIt can be downloaded from Aminet:comm/www/getvideo.lha" "OK"'