2012-02-15 21:15:10 -05:00
|
|
|
<?php
|
|
|
|
/**
|
|
|
|
* Name: Quick Comment
|
|
|
|
* Description: Two click comments
|
|
|
|
* Version: 1.0
|
|
|
|
* Author: Mike Macgirvin <http://macgirvin.com/profile/mike>
|
2018-01-22 14:03:11 -05:00
|
|
|
*
|
2012-02-16 23:00:35 -05:00
|
|
|
* Provides a set of text "snippets" which can be inserted into a comment window by clicking on them.
|
2018-01-22 14:03:11 -05:00
|
|
|
* First enable the addon in the system admin panel.
|
|
|
|
* Then each person can tailor their choice of words in Settings->Addon Settings in the Qcomment
|
2012-02-16 23:00:35 -05:00
|
|
|
* pane. Initially no qcomments are provided, but on viewing the settings page, a default set of
|
2018-01-22 14:03:11 -05:00
|
|
|
* of words is suggested. These can be accepted (click Submit) or edited first. Each text line represents
|
|
|
|
* a different qcomment.
|
2012-02-16 23:00:35 -05:00
|
|
|
* Many themes will hide the qcomments above or immediately adjacent to the comment input box until
|
|
|
|
* you wish to use them. On some themes they may be visible.
|
2018-01-22 14:03:11 -05:00
|
|
|
* Wave the mouse around near the comment input box and the qcomments will show up. Click on any of
|
2012-02-16 23:00:35 -05:00
|
|
|
* them to open the comment window fully and insert the qcomment. Then "Submit" will submit it.
|
|
|
|
*
|
2012-02-15 21:15:10 -05:00
|
|
|
*/
|
2021-11-20 04:56:55 -05:00
|
|
|
|
|
|
|
use Friendica\App;
|
2018-12-26 02:28:16 -05:00
|
|
|
use Friendica\Core\Hook;
|
2021-11-20 04:56:55 -05:00
|
|
|
use Friendica\Core\Renderer;
|
2019-12-29 21:55:10 -05:00
|
|
|
use Friendica\DI;
|
2018-11-05 07:47:04 -05:00
|
|
|
use Friendica\Util\XML;
|
2017-11-06 18:55:24 -05:00
|
|
|
|
2020-09-09 16:52:43 -04:00
|
|
|
function qcomment_install()
|
|
|
|
{
|
|
|
|
Hook::register('addon_settings' , __FILE__, 'qcomment_addon_settings');
|
|
|
|
Hook::register('addon_settings_post', __FILE__, 'qcomment_addon_settings_post');
|
|
|
|
Hook::register('footer' , __FILE__, 'qcomment_footer');
|
|
|
|
}
|
2012-02-15 21:15:10 -05:00
|
|
|
|
2023-01-13 21:16:09 -05:00
|
|
|
function qcomment_footer(string &$body)
|
2020-09-09 16:52:43 -04:00
|
|
|
{
|
2021-11-20 04:29:09 -05:00
|
|
|
DI::page()->registerFooterScript('addon/qcomment/qcomment.js');
|
2012-02-15 21:15:10 -05:00
|
|
|
}
|
|
|
|
|
2023-01-13 21:16:09 -05:00
|
|
|
function qcomment_addon_settings(array &$data)
|
2017-12-06 16:27:55 -05:00
|
|
|
{
|
2022-10-20 17:51:49 -04:00
|
|
|
if (!DI::userSession()->getLocalUserId()) {
|
2012-02-15 21:15:10 -05:00
|
|
|
return;
|
2017-12-06 16:27:55 -05:00
|
|
|
}
|
2012-02-15 21:15:10 -05:00
|
|
|
|
2022-10-20 17:51:49 -04:00
|
|
|
$words = DI::pConfig()->get(DI::userSession()->getLocalUserId(), 'qcomment', 'words', DI::l10n()->t(':-)') . "\n" . DI::l10n()->t(':-(') . "\n" . DI::l10n()->t('lol'));
|
2012-02-15 21:15:10 -05:00
|
|
|
|
2021-11-20 04:56:55 -05:00
|
|
|
$t = Renderer::getMarkupTemplate('settings.tpl', 'addon/qcomment/');
|
|
|
|
$html = Renderer::replaceMacros($t, [
|
|
|
|
'$description' => DI::l10n()->t('Quick comments are found near comment boxes, sometimes hidden. Click them to provide simple replies.'),
|
2020-09-09 16:52:43 -04:00
|
|
|
'$words' => ['qcomment-words', DI::l10n()->t('Enter quick comments, one per line'), $words, null, ' rows="10"'],
|
|
|
|
]);
|
2021-11-20 04:56:55 -05:00
|
|
|
|
|
|
|
$data = [
|
|
|
|
'addon' => 'qcomment',
|
|
|
|
'title' => DI::l10n()->t('Quick Comment Settings'),
|
|
|
|
'html' => $html,
|
|
|
|
];
|
2012-02-15 21:15:10 -05:00
|
|
|
}
|
|
|
|
|
2023-01-13 21:16:09 -05:00
|
|
|
function qcomment_addon_settings_post(array &$b)
|
2018-11-03 13:16:21 -04:00
|
|
|
{
|
2022-10-20 17:51:49 -04:00
|
|
|
if (!DI::userSession()->getLocalUserId()) {
|
2012-02-15 21:15:10 -05:00
|
|
|
return;
|
2018-11-03 13:16:21 -04:00
|
|
|
}
|
2012-02-15 21:15:10 -05:00
|
|
|
|
2020-09-09 16:52:43 -04:00
|
|
|
if (isset($_POST['qcomment-words'])) {
|
2022-10-20 17:51:49 -04:00
|
|
|
DI::pConfig()->set(DI::userSession()->getLocalUserId(), 'qcomment', 'words', XML::escape($_POST['qcomment-words']));
|
2012-02-15 21:15:10 -05:00
|
|
|
}
|
|
|
|
}
|