Develop and Download Open Source Software

Browse CVS Repository

Diff of /gikonavigoeson/gikonavi/Favorite.pas

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.31 by yoffy, Sun Apr 11 10:03:34 2004 UTC revision 1.32 by yoffy, Tue Apr 13 11:34:23 2004 UTC
# Line 127  begin Line 127  begin
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

Back to OSDN">Back to OSDN
ViewVC Help
Powered by ViewVC 1.1.26