Просмотр поста #82909: Изменить фунц.пых

заменить существующую на
f u n c t i o n u r l _ r e p l a c e ( $m ) { g
l o b a l $ s e t ; i f ( ! i s s e t ( $m [ 3 ] ) )
{ $ t mp = p a r s e _ u r l ( $m [ 1 ] ) ; i f
( ' h t t p : / / ' . $ t mp [ ' h o s t ' ] = = $ s
e t [ ' h ome u r l ' ] ) { r e t u r n ' < a h r e f = " ' ( ' : ' , ' &#5 8 ; ' , $m [ 1 ] ) . ' " >
' . s t r _ r e ( ' : ' , ' &#5 8 ; ' , $m [ 2 ] ) . '
< / a > ' ; } e l s e { r e t u r n ' < a h r e f
= " ' [ ' h ome u r l ' ] . ' / g o . p h p ? u r
l = ' . b a s e 6 4 _ e n c o d ( s t r _ r e p l
a c e ( ' : ' , ' &#5 8 ; ' , $m [ 1 ] ) ) . ' " > ' . s t r _ r ( ' : ' , ' &#5 8 ; ' , $m [ 2 ] ) . ' < /
a > ' ; }
} e l s e { $ t mp = p a r s e _ u r l ( $m
[ 3 ] ) ; $m [ 3 ] = s t r _ r e p l a c e ( ' : ' , '
&#5 8 ; ' , $m [ 3 ] ) ; i f ( ' h t t p : / / ' . $
t mp [ ' h o s t ' ] = = $ s e t [ ' h ome u r l ' ] ) { r e t u r n ' < a h r e f = " ' [ 3 ] . ' " >
' . $m [ 3 ] . ' < / a > ' ; } e l s e { r e t u r n
' < a h r e f = " ' [ ' h ome u r l ' ] . ' / g o .
p h p ? u r l = ' . b a s e 6 4 _ e n c o d
( $m [ 3 ] ) . ' " > ' . $m [ 3 ] . ' < / a > ' ; }
} }