diff options
| author |   William Heimbigner <william.heimbigner@gmail.com> | 2016-05-05 14:54:32 -0700 |
|---|---|---|
| committer | William Heimbigner <william.heimbigner@gmail.com> | 2016-05-05 14:54:32 -0700 |
| commit | 141fc30c89eb8f5a7e638c0a8555f05bb8981bfb (patch) | |
| tree | b60885048862e9d7f741ea8e0f8e6055b2e07751 | |
| parent | 87fb29a330bac19bb546f0910f4ea646b9fe9a23 (diff) | |
Use YOURLS shortening service rather than shortener.godaddy.com
| -rw-r--r-- | config-default/settings.xml | 5 | ||||
| -rw-r--r-- | lib/ASM/Shortener.pm | 4 |
2 files changed, 6 insertions, 3 deletions
diff --git a/config-default/settings.xml b/config-default/settings.xml index 69f2f52..c9b84a0 100644 --- a/config-default/settings.xml +++ b/config-default/settings.xml @@ -29,8 +29,9 @@ <groupfile>/var/www/.htgroup</groupfile> <userfile>/var/www/.htpasswd</userfile> <shortener> - <apikey>look.at.shortener.godaddy.com</apikey> - <domain></domain> + <apikey>yoursecretkey</apikey> + <domain>yourls.org</domain> + <secure>0</secure> </shortener> </web> </settings> diff --git a/lib/ASM/Shortener.pm b/lib/ASM/Shortener.pm index cd3f32a..8ec7d42 100644 --- a/lib/ASM/Shortener.pm +++ b/lib/ASM/Shortener.pm @@ -18,9 +18,11 @@ sub shorturl } my $apikey = $::settings->{web}->{shortener}->{apikey}; my $domain = $::settings->{web}->{shortener}->{domain}; + my $secure = $::settings->{web}->{shortener}->{secure}; my $ua = LWP::UserAgent->new; $ua->agent("AntiSpamMeta/13.37 "); - my $res = $ua->get('https://shortener.godaddy.com/v1/?apikey=' .$apikey . '&domain=' . $domain .'&url=' . uri_escape($url) ); + my $res = $ua->get('http' . ($secure ? 's' : '') . '://' . $domain . '/yourls-api.php?' . + 'signature=' . $apikey . '&action=shorturl&format=simple&url=' . uri_escape($url) ); if ($res->is_success) { return $res->content; } |