function corr_img($doc, $id)
{
$lk = prepdlink($doc);
$_SESSION['read'] = $id;
if (is_image($lk[0]) && substr($lk[0], 0, 4) == "http") {
return '[' . vacuum_image($lk[0], $id) . (strpos($doc, '§') ? '§' . $lk[1] : '') . ']';
} elseif (is_image($lk[1]) == true && substr($lk[1], 0, 4) == "http") {
return '[' . (strpos($doc, '§') ? $lk[0] . '§' : '') . vacuum_image($lk[1], $id) . ']';
} else {
return '[' . $doc . ']';
}
}
function rssin($k, $v)
{
$lk = prepdlink($v);
$f = $lk[0];
$f = https($f);
if (substr($f, 0, 4) != 'http' && $f) {
$f = 'http://' . $f;
}
$r = rssin_load($f);
$nb = count($r);
$ret = hidden('', 'addop', 1);
$t = rssin_t($k, $v, $f);
foreach ($r as $k => $v) {
list($va, $lnk, $dat, $id) = $v;
$btc = '';
$lnj = ajx($lnk);
$i++;
if (!$id) {
$btc = ljc('', 'popup', 'ajxf_batch*preview_' . $lnj, picto('view'));
$fb = nohttp($lnk);
if (auth(4)) {
$mem = @$_SESSION['vacuum'][$fb] ? 'ok' : picto('add');
$btc .= lj('" id="ars' . $i, 'ars' . $i . '_batch___' . $lnj . '_p', $mem);
$btc .= saveiec($lnj, @$_SESSION['vaccat'][$fb], 'rss' . randid(), '', '', '', '', $va);
$btc .= lj('', 'popup_search__3_' . ajx($va) . '_', picto('search'));
}
} else {
$btc .= popart($id) . ' ';
}
$btc .= lkt('', $lnk, picto('url'));
$btc .= btn('txtsmall', $dat);
if ($va) {
$ret .= balc('li', '', $btc . ' ' . $va);
}
}
//$id?'hide':
$ret = scroll_b($nb, $ret, 16, 320);
return $t . balc("ul", "panel pubart", $ret);
}
