Line | |
---|
1 | <?php |
---|
2 | # -- BEGIN LICENSE BLOCK --------------------------------------- |
---|
3 | # |
---|
4 | # This file is part of Dotclear 2. |
---|
5 | # |
---|
6 | # Copyright (c) 2003-2013 Olivier Meunier & Association Dotclear |
---|
7 | # Licensed under the GPL version 2.0 license. |
---|
8 | # See LICENSE file or |
---|
9 | # http://www.gnu.org/licenses/old-licenses/gpl-2.0.html |
---|
10 | # |
---|
11 | # -- END LICENSE BLOCK ----------------------------------------- |
---|
12 | if (!defined('DC_CONTEXT_ADMIN')) { return; } |
---|
13 | |
---|
14 | l10n::set(dirname(__FILE__).'/locales/'.$_lang.'/main'); |
---|
15 | $css_file = path::real($core->blog->public_path).'/custom_style.css'; |
---|
16 | |
---|
17 | if (!is_file($css_file) && !is_writable(dirname($css_file))) { |
---|
18 | throw new Exception( |
---|
19 | sprintf(__('File %s does not exist and directory %s is not writable.'), |
---|
20 | $css_file,dirname($css_file)) |
---|
21 | ); |
---|
22 | } |
---|
23 | |
---|
24 | if (isset($_POST['css'])) |
---|
25 | { |
---|
26 | @$fp = fopen($css_file,'wb'); |
---|
27 | fwrite($fp,$_POST['css']); |
---|
28 | fclose($fp); |
---|
29 | |
---|
30 | dcPage::message(__('Style sheet upgraded.'),true,true); |
---|
31 | } |
---|
32 | |
---|
33 | $css_content = is_file($css_file) ? file_get_contents($css_file) : ''; |
---|
34 | |
---|
35 | echo |
---|
36 | '<p class="area"><label>'.__('Style sheet:').' '. |
---|
37 | form::textarea('css',60,20,html::escapeHTML($css_content)).'</label></p>'; |
---|
38 | ?> |
---|
Note: See
TracBrowser
for help on using the repository browser.