function web_pobex_update_slides(web_root)
%function web_pobex_update_pubs
irec=0;
% ---------------------------- Load db
[db]=web_db_load_slides;
% Keep pobex
for i=1:length(db)
str=db(i).vis{:};
if strfind(str,'#pobex#')
irec=irec+1;
db_all(irec)=db(i);
end
end
% Prepare HTML
il=0;
db=db_all; clear file
for i=1:length(db)
FILE=db(i).file{:}; DESC=db(i).desc{:};
str=[' ',DESC,' - [ view ]
'];
if strcmp(db(i).name,'SEPARATOR')
str=['-------- ',db(i).desc{:},' --------
'];
end
if strcmp(db(i).type,'SL NOTE')
il=il+1; file{il}=str;
end
end
% Update HTML
str_start='