[Win32forth-cvs] win32forth/apps/PlayVirginRadio PlayVirginRadio.f, 1.14, 1.15

[Dirk B. <db...@us...>]

Update of /cvsroot/win32forth/win32forth/apps/PlayVirginRadio
In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv18234

Modified Files:
	PlayVirginRadio.f 
Log Message:
The URL to the radio station in the internet has changed.

Index: PlayVirginRadio.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/apps/PlayVirginRadio/PlayVirginRadio.f,v
retrieving revision 1.14
retrieving revision 1.15
diff -C2 -d -r1.14 -r1.15
*** PlayVirginRadio.f	2 Sep 2008 06:38:39 -0000	1.14
--- PlayVirginRadio.f	17 Dec 2008 08:25:27 -0000	1.15
***************
*** 18,22 ****
  needs HtmlControl.f
  needs SoundVolume.f
- \ needs NoConsole.f
  needs Resources.f
  
--- 18,21 ----
***************
*** 38,42 ****
  
  :M StartSize:   ( -- w h )
!         470 265 ;M
  
  :M On_Size:     ( -- )
--- 37,44 ----
  
  :M StartSize:   ( -- w h )
!         840 380 ;M
! 
! :M StartPos:   ( -- w h )
!         100 100 ;M
  
  :M On_Size:     ( -- )
***************
*** 60,64 ****
  
  :M Play:        ( -- )
!         z" http://www.smgradio.com/core/player/index.html?service=vc"
          SetURL: Player ;M
  
--- 62,68 ----
  
  :M Play:        ( -- )
! \ They changed the URL!
! \       z" http://www.smgradio.com/core/player/index.html?service=vc"
!         z" http://player.absoluteradio.co.uk/core/player/?service=abc"
          SetURL: Player ;M
  
***************
*** 162,165 ****
  [else]
          s" apps\PlayVirginRadio\Virgin.ico" s" PlayVirginRadio.exe" Prepend<home>\ AddAppIcon
!         Main
  [then]
--- 166,169 ----
  [else]
          s" apps\PlayVirginRadio\Virgin.ico" s" PlayVirginRadio.exe" Prepend<home>\ AddAppIcon
!         StartPlayer
  [then]