Subversion Repositories wimsdev

Rev

Rev 14861 | Rev 14903 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 14861 Rev 14886
Line 45... Line 45...
45
  listlink=!append line ln -s $wims_home/s2/$userses/$f $wims_home/s2/$wims_session/user$po-$f; to $listlink
45
  listlink=!append line ln -s $wims_home/s2/$userses/$f $wims_home/s2/$wims_session/user$po-$f; to $listlink
46
!next f
46
!next f
47
!! ---------- build copy of user page
47
!! ---------- build copy of user page
48
!read oef/fr/names
48
!read oef/fr/names
49
 
49
 
-
 
50
 
50
page_content=!sh sed -n '/<!--BEGINSUPVIEW-->/,/<!--ENDSUPVIEW-->/p' $wims_home/s2/$userses/last.html | sed -n '/<script>/,/<\/script>/!p' | sed 's#<a[^>]*>#<font color="blue"><u>#gi;\
51
page_content=!sh sed -n '/<!--BEGINSUPVIEW-->/,/<!--ENDSUPVIEW-->/p' $wims_home/s2/$userses/last.html | sed 's#<a[^>]*>#<font color="blue"><u>#gi;\
51
s#</a>#</u></font>#gi;\
52
s#</a>#</u></font>#gi;\
52
s#<form[^>]*># #gi;\
53
s#<form[^>]*># #gi;\
53
s#</form># #gi;\
54
s#</form># #gi;\
54
s#$(userses)#$wims_session#gi;\
55
s#$(userses)#$wims_session#gi;\
55
$listsed'
56
$listsed'
56
 
57
 
57
!! make link to file of the user_session in supervisor_session (del old link before)
58
!! make link to file of the user_session in supervisor_session (del old link before)
58
list=!sh cd $wims_home/s2/$wims_session;\
59
list=!sh cd $wims_home/s2/$wims_session;\
59
lt=`find user$(po)* -type l`;\
60
lt=`find user$(po)* -type l 2>/dev/null`;\
60
for f in $$lt; do rm $$f; done;\
61
for f in $$lt; do rm $$f; done;\
61
$listlink
62
$listlink
62
 
63
 
63
warning=workinprogress
64
warning=workinprogress
64
 
-
 
65
 
65
 
-
 
66
!let rd=!randint 111111,999999
-
 
67
local_html_header=<META HTTP-EQUIV="Refresh" CONTENT="5;wims.cgi?session=$wims_session&+cmd=reply&+module=adm/class/tchat&+job=viewpage&+numberses=$k&+user=$user">
-
 
68
 
-
 
69
!exit
-
 
70
 
-
 
71
 
-
 
72
 
-
 
73
!! ----------- not in use
-
 
74
 
-
 
75
 
-
 
76
page_content=!sh sed -n '/<!--BEGINSUPVIEW-->/,/<!--ENDSUPVIEW-->/p' $wims_home/s2/$userses/last.html | sed 's#<a[^>]*>#<font color="blue"><u>#gi;\
-
 
77
s#</a>#</u></font>#gi;\
-
 
78
s#<form[^>]*># #gi;\
-
 
79
s#</form># #gi;\
-
 
80
s#$(userses)#$wims_session#gi;\
-
 
81
s#id="exo_giveup_opener"# #gi;\
-
 
82
$listsed'
-
 
83
 
-
 
84
page_content=!sh sed -n '/<!--BEGINSUPVIEW-->/,/<!--ENDSUPVIEW-->/p' $wims_home/s2/$userses/last.html | sed -n '/<script>/,/<\/script>/!p' | sed 's#<a[^>]*>#<font color="blue"><u>#gi;\
-
 
85
s#</a>#</u></font>#gi;\
-
 
86
s#<form[^>]*># #gi;\
-
 
87
s#</form># #gi;\
-
 
88
s#$(userses)#$wims_session#gi;\
-
 
89
$listsed'