4 * Description: Additional poke options
6 * Author: Thomas Willingham <https://kakste.com/profile/beardyunixer>
9 use Friendica\Core\Hook;
10 use Friendica\Core\L10n;
12 function morepokes_install()
14 Hook::register('poke_verbs', 'addon/morepokes/morepokes.php', 'morepokes_poke_verbs');
17 function morepokes_uninstall()
19 Hook::unregister('poke_verbs', 'addon/morepokes/morepokes.php', 'morepokes_poke_verbs');
22 function morepokes_poke_verbs($a, &$b)
24 $b['bitchslap'] = ['bitchslapped', L10n::t('bitchslap'), L10n::t('bitchslapped')];
25 $b['shag'] = ['shag', L10n::t('shag'), L10n::t('shagged')];
26 $b['somethingobscenelybiological'] = ['something obscenely biological', L10n::t('do something obscenely biological to'), L10n::t('did something obscenely biological to')];
27 $b['newpokefeature'] = ['pointed out the poke feature to', L10n::t('point out the poke feature to'), L10n::t('pointed out the poke feature to')];
28 $b['declareundyinglove'] = ['declared undying love for', L10n::t('declare undying love for'), L10n::t('declared undying love for')];
29 $b['patent'] = ['patented', L10n::t('patent'), L10n::t('patented')];
30 $b['strokebeard'] = ['stroked their beard at', L10n::t('stroke beard'), L10n::t('stroked their beard at')];
31 $b['bemoan'] = ['bemoaned the declining standards of modern secondary and tertiary education to', L10n::t('bemoan the declining standards of modern secondary and tertiary education to'), L10n::t('bemoans the declining standards of modern secondary and tertiary education to')];
32 $b['hugs'] = ['hugged', L10n::t('hug'), L10n::t('hugged')];
33 $b['kiss'] = ['kissed', L10n::t('kiss'), L10n::t('kissed')];
34 $b['raiseeyebrows'] = ['raised their eyebrows at', L10n::t('raise eyebrows at'), L10n::t('raised their eyebrows at')];
35 $b['insult'] = ['insulted', L10n::t('insult'), L10n::t('insulted')];
36 $b['praise'] = ['praised', L10n::t('praise'), L10n::t('praised')];
37 $b['bedubiousof'] = ['was dubious of', L10n::t('be dubious of'), L10n::t('was dubious of')];
38 $b['eat'] = ['ate', L10n::t('eat'), L10n::t('ate')];
39 $b['giggleandfawn'] = ['giggled and fawned at', L10n::t('giggle and fawn at'), L10n::t('giggled and fawned at')];
40 $b['doubt'] = ['doubted', L10n::t('doubt'), L10n::t('doubted')];
41 $b['glare'] = ['glared at', L10n::t('glare'), L10n::t('glared at')];