Subversion Repositories Kolibri OS

Rev

Rev 6857 | Rev 8827 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
1665 Nasarus 1
 
2
{
3
4
 
6826 siemargl 5
kol_struct70	k70;
1665 Nasarus 6
unsigned	result;
7
8
 
6822 siemargl 9
	{
1665 Nasarus 10
	#if LANG_ENG
1668 Nasarus 11
		printf("  rmdir \n\r");
12
	#elif LANG_RUS
8078 superturbo 13
		printf("  rmdir <директория>\n\r");
1668 Nasarus 14
	#endif
15
	return TRUE;
3247 Albom 16
	}
1665 Nasarus 17
18
 
19
	{
20
	return FALSE;
21
	}
22
23
 
24
k70.p04 = 0;
25
//k70.p08 = 0;
6857 siemargl 26
k70.p12 = 0;
1665 Nasarus 27
k70.p16 = 0;
28
k70.p20 = 0;
29
30
 
31
	k70.p21 = dir;
32
else
33
	{
34
	strcpy(temp, cur_dir);
35
	if (temp[strlen(temp)-1] != '/')
6826 siemargl 36
		strcat(temp, "/"); // add slash
37
	strcat(temp, dir);
1665 Nasarus 38
	k70.p21 = temp;
39
	}
40
41
 
42
	return FALSE;
43
44
 
45
46
 
47
	return TRUE;
48
else
49
	return FALSE;
50
51
 
52