Subversion Repositories wimsdev

Rev

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

Rev 17186 Rev 17665
Line 2... Line 2...
2
!default size_=50
2
!default size_=50
3
!if session isin $http_
3
!if session isin $http_
4
 !exit
4
  !exit
5
!endif
5
!endif
6
!let qrencode_=!defof QRencode_command\
6
!let qrencode_=!defof QRencode_command\
7
QRencode_open in wimshome/log/wims.conf
7
QRencode_open in wimshome/log/wims.conf
8
!distribute line $qrencode_ into qrencode_,qrencodeopen_
8
!distribute line $qrencode_ into qrencode_,qrencodeopen_
9
!if $qrencodeopen_!=yes
9
!if $qrencodeopen_!=yes
10
 !exit
10
  !exit
11
!endif
11
!endif
12
!default qrencode_=!defof DF_QRencode_command in wimshome/public_html/bases/sys/defaults.conf
12
!default qrencode_=!defof DF_QRencode_command in wimshome/public_html/bases/sys/defaults.conf
13
!let name_=!word 1 of $qrencode_
13
!let name_=!word 1 of $qrencode_
14
!let test_=!sh which $name_
14
!let test_=!sh which $name_
15
!if /$name_ notin $test_
15
!if /$name_ notin $test_
16
 !exit
16
  !exit
17
!endif
17
!endif
18
!sh $qrencode_ $wims_home/s2/$wims_session/qrencode.png $http_
18
!sh $qrencode_ $wims_home/s2/$wims_session/qrencode.png $http_
19
<img src="$wims_ref_name?session=$wims_session&+cmd=getins&+special_parm=qrencode.png"
19
<img src="$wims_ref_name?session=$wims_session&+cmd=getins&+special_parm=qrencode.png"
20
  style="width:$(size_)px" alt="qrencode">
20
  style="width:$(size_)px" alt="qrencode">