Subversion Repositories Kolibri OS

Rev

Rev 6216 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6216 Rev 6969
Line 75... Line 75...
75
				EDI = #redirect_url;
75
				EDI = #redirect_url;
76
				do {
76
				do {
77
					$lodsb;
77
					$lodsb;
78
					$stosb;
78
					$stosb;
79
				} while (AL != 0) && (AL != 13) && (AL != 10));
79
				} while ((AL != 0) && (AL != 13) && (AL != 10));
80
				DSBYTE[EDI-1]='\0';
80
				DSBYTE[EDI-1]='\0';
81
			}
81
			}
82
			get_absolute_url(#finaladress, url, #redirect_url);
82
			get_absolute_url(#finaladress, url, #redirect_url);
83
			Stop();
83
			Stop();
84
			Start(#finaladress);
84
			Start(#finaladress);
85
			url = #finaladress;
85
			url = #finaladress;