-- Leo's gemini proxy

-- Connecting to git.thebackupbox.net:1965...

-- Connected

-- Sending request

-- Meta line: 20 text/gemini

repo: rxvt-unicode-sixel
action: commit
revision:
path_from:
revision_from: 801eb1faf6748983aaaeef492f80c9aa82d71966:
path_to:
revision_to:

commit 801eb1faf6748983aaaeef492f80c9aa82d71966
Author: Marc Lehmann <schmorp@schmorp.de>
Date:   Tue Jan 17 16:57:07 2006 +0000

    *** empty log message ***

diff --git a/src/perl/selection-pastebin b/src/perl/selection-pastebin

--- a/src/perl/selection-pastebin
+++ b/src/perl/selection-pastebin
@@ -1,5 +1,4 @@
 #! perl
-use Digest::MD5 qw/md5_hex/;

 my $timers = {};
 my $pastebin_cmd;
@@ -14,15 +13,17 @@ sub on_start {
    $pastebin_url =
       $self->x_resource ("selection-pastebin-url")
       or "http://www.ta-sa.org/files/txt/";
-   ();
+
+   ()
 }

 sub upload_paste {
    my ($self) = @_;

+   require Digest::MD5;

    my $txt = $self->selection;
-   my $filename = md5_hex ($txt) . ".txt";
+   my $filename = Digest::MD5::md5_hex ($txt) . ".txt";

    my $tmpfile = "/tmp/$filename";

-- Response ended

-- Page fetched on Sun Jun 2 11:02:05 2024