# 2022/04/25 17:53:10 : Generate from 'skel/_frame.html'; #------------------------------------------------------------------------------ # [WARNING] Don't edit this file. If you edit this, will be occoued error. #------------------------------------------------------------------------------ Version=1.01 165087655016508763521sub { my $R = shift; my $O = shift; my $L = shift; my $v = $R->{v}; $_[0] = \$v; my @F; push(@F, sub { my ($self, $file) = @_; return -s $file; }); my ($css,$file,$tm,$ps,$s,$t); $R->{inframe}=$R->{argv}->[0]; ($v->{title} eq '') && ($v->{title}='adiary'); $s=$v->{blog}; $$O .= ' '; $R->{no_robots} && ($$O .= ("\n")); my $X=$v->load_jscss($R->{Basepath},'csslib'); if (ref($X) ne 'ARRAY') { $X=[]; $R->error_from("line 18 at $R->{__src_file}", '[executor] forexec: data is not array'); }; foreach my $t (@{ $X }) { $$O .= ' '; } $v->{sphone} && ($$O .= ("\n")); (299<$v->{sphone}) && ($$O .= ("\n")); $$O .= '{theme_dir}base.css"))); $$O .= '"> {theme_dir}$v->{theme}/$v->{theme_name}.css"))); $$O .= '" id="theme-css"> '; if (((!$v->{special_system_mode})&&$s->{theme_custom})&&($s->{theme} eq $v->{theme})) { $$O .= ' '; } $file="$v->{blogpub_dir}dynamic.css"; if (((!$v->{system_mode})&&(!$v->{stop_all_plugins}))&&&{$F[0]}($R,$file)) { $$O .= ' '; } my $X=$v->load_jscss($R->{Basepath},'css'); if (ref($X) ne 'ARRAY') { $X=[]; $R->error_from("line 37 at $R->{__src_file}", '[executor] forexec: data is not array'); }; foreach my $t (@{ $X }) { $$O .= ' '; } $R->{canonical_url} && ($$O .= ("{canonical_url}\">\n")); my $X=$v->load_rss_files(); if (ref($X) ne 'ARRAY') { $X=[]; $R->error_from("line 43 at $R->{__src_file}", '[executor] forexec: data is not array'); }; foreach my $t (@{ $X }) { $$O .= ' '; } $$O .= '{pubdist_dir}default-icon.png"; $$O .= '"> '; if ($R->{DevelopJS}) { $$L=51; $$O .= $R->_call(($v->{script_dir}.'adiary-js-load.html')); $v=$R->{v}; $R->{Break} && return; } else { $$O .= ' '; } my $X=$v->load_jscss($R->{Basepath},'jslib'); if (ref($X) ne 'ARRAY') { $X=[]; $R->error_from("line 55 at $R->{__src_file}", '[executor] forexec: data is not array'); }; foreach my $t (@{ $X }) { $$O .= ' '; } my $X=$v->load_jscss($R->{Basepath},'js'); if (ref($X) ne 'ARRAY') { $X=[]; $R->error_from("line 58 at $R->{__src_file}", '[executor] forexec: data is not array'); }; foreach my $t (@{ $X }) { $$O .= ' '; } $file="$v->{theme_dir}$v->{theme}/$v->{theme_name}.js"; ((!$R->{js_stop})&&&{$F[0]}($R,$file)) && ($$O .= ("\n")); $$O .= ' '; $$O .= $v->{subtitle}; ($v->{subtitle} ne '') && ($$O .= (' - ')); $$O .= $v->{title}; $$O .= ' '; $$O .= $v->{extra_header}; (!$v->{system_mode}) && ($$O .= ($s->{html_header_txt})); $$O .= ' '; if ($v->{special_system_mode}) { $$O .= $R->{inframe}; (($R->{Develop}&&((@{$R->{Error}}||@{$R->{Warning}})||@{$R->{Debug}}))||$R->{ENV_print}) && ($$O .= $R->call('_sub/debug')); } else { $$O .= '
'; $$L=78; $$O .= $R->call('_header'); $v=$R->{v}; $R->{Break} && return; $$O .= '
'; $$O .= $R->{inframe}; $$O .= '
'; $$L=95; $$O .= $R->call(($v->{sidebar} ? $v->{sidebar} : '_sidebar')); $v=$R->{v}; $R->{Break} && return; (($R->{Develop}&&((@{$R->{Error}}||@{$R->{Warning}})||@{$R->{Debug}}))||$R->{ENV_print}) && ($$O .= $R->call('_sub/debug')); $$O .= '
'; $$L=101; $ps=$v->load_plgset('def_footer'); $$O .= '
'; } $$O .= ' '; $$O .= $v->{post_html}; $$O .= ' '; } 000