wamo/gnu-social
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

trac31 added 3 more short url services: ur1.ca, 2tu.ru and ptiturl.com

Browse Source 
darcs-hash:20081107194735-099f7-fe1ef28b4d36e5dde9e6addc287ad22946b060cd.gz
This commit is contained in:
millette 2008-11-07 14:47:35 -05:00
parent 4abd5a6ed9
commit 4eecefb548
2 changed files with 18 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
actions/othersettings.php
View File

@ -42,6 +42,9 @@ class OthersettingsAction extends SettingsAction {
$services = array( $services = array(
'' => 'None', '' => 'None',
'ur1.ca' => 'ur1.ca (free)',
'2tu.ru' => '2tu.ru (free)',
'ptiturl.com' => 'ptiturl.com',
'tinyurl.com' => 'tinyurl.com', 'tinyurl.com' => 'tinyurl.com',
'is.gd' => 'is.gd', 'is.gd' => 'is.gd',
'snipr.com' => 'snipr.com', 'snipr.com' => 'snipr.com',

15
lib/util.php
View File

@ -763,6 +763,21 @@ function common_shorten_link($long_url) {
curl_setopt($curlh, CURLOPT_RETURNTRANSFER, true); curl_setopt($curlh, CURLOPT_RETURNTRANSFER, true);
switch($user->urlshorteningservice) { switch($user->urlshorteningservice) {
case 'ur1.ca':
$short_url_service = new LilUrl;
$short_url = $short_url_service->shorten($long_url);
break;
case '2tu.ru':
$short_url_service = new TightUrl;
$short_url = $short_url_service->shorten($long_url);
break;
case 'ptiturl.com':
$short_url_service = new PtitUrl;
$short_url = $short_url_service->shorten($long_url);
break;
case 'is.gd': case 'is.gd':
curl_setopt($curlh, CURLOPT_URL, 'http://is.gd/api.php?longurl='.urlencode($long_url)); curl_setopt($curlh, CURLOPT_URL, 'http://is.gd/api.php?longurl='.urlencode($long_url));
$short_url = curl_exec($curlh); $short_url = curl_exec($curlh);