Browse CVS Repository
Diff of /gikonavigoeson/gikonavi/Favorite.pas
Parent Directory
| Revision Log
| Revision Graph
| Patch
| 127 |
tmpURL := URL; |
tmpURL := URL; |
| 128 |
GikoSys.ParseURI( tmpURL, protocol, host, path, document, port, bookmark ); |
GikoSys.ParseURI( tmpURL, protocol, host, path, document, port, bookmark ); |
| 129 |
if GikoSys.Is2chHost( host ) then begin |
if GikoSys.Is2chHost( host ) then begin |
| 130 |
GikoSys.Parse2chURL( tmpURL, path, document, BBSID, BBSKey ); |
BBSID := GikoSys.URLToID( tmpURL ); |
| 131 |
FItem := BBSs[ 0 ].FindBBSID( BBSID ); |
FItem := BBSs[ 0 ].FindBBSID( BBSID ); |
| 132 |
if FItem <> nil then |
if FItem <> nil then |
| 133 |
URL := FItem.URL; |
URL := FItem.URL; |
|
|
Legend:
| Removed from v.1.31 |
|
| changed lines |
| |
Added in v.1.32 |
|
|
| |