Date: Mon, 26 Dec 2005 18:50:31 +0800 (CST) From: Gea-Suan Lin <gslin@gslin.org> To: FreeBSD-gnats-submit@FreeBSD.org Cc: gslin@gslin.org Subject: ports/90919: [NEW PORT] www/p5-WebService-NoPaste: Post to Paste Web Pages Message-ID: <20051226105031.14A91240@netnews.NCTU.edu.tw> Resent-Message-ID: <200512261100.jBQB0H9j016847@freefall.freebsd.org>
next in thread | raw e-mail | index | archive | help
>Number: 90919 >Category: ports >Synopsis: [NEW PORT] www/p5-WebService-NoPaste: Post to Paste Web Pages >Confidential: no >Severity: non-critical >Priority: low >Responsible: freebsd-ports-bugs >State: open >Quarter: >Keywords: >Date-Required: >Class: change-request >Submitter-Id: current-users >Arrival-Date: Mon Dec 26 11:00:17 GMT 2005 >Closed-Date: >Last-Modified: >Originator: Gea-Suan Lin >Release: FreeBSD 6.0-RELEASE i386 >Organization: >Environment: System: FreeBSD netnews.NCTU.edu.tw 6.0-RELEASE FreeBSD 6.0-RELEASE #3: Sat Dec 10 02:26:21 CST 2005 >Description: When online chatting it is problematic to paste an entire 300 line file. Yes paste? No. NoPaste! Posting to a paste host is preferred. These servers are just web forms that accept input from a big text field, and temporarily house them as web pages. This script/module is for those who find it tedious to switch to a web browser, load the page, and then paste. Why use the mouse when you can use the keyboard? ;) When online chatting it is problematic to paste an entire 300 line file. Yes paste? No. NoPaste! Posting to a paste host is preferred. These servers are just web forms that accept input from a big text field, and temporarily house them as web pages. This script/module is for those who find it tedious to switch to a web browser, load the page, and then paste. Why use the mouse when you can use the keyboard? ;) Author: Ryan King <rking@panoptic.com> WWW: http://search.cpan.org/dist/WebService-NoPaste/ Generated with FreeBSD Port Tools 0.63 >How-To-Repeat: >Fix: --- p5-WebService-NoPaste-0.03.shar begins here --- # This is a shell archive. Save it in a file, remove anything before # this line, and then unpack it by entering "sh file". Note, it may # create directories; files and directories will be owned by you and # have default permissions. # # This archive contains: # # p5-WebService-NoPaste # p5-WebService-NoPaste/pkg-descr # p5-WebService-NoPaste/Makefile # p5-WebService-NoPaste/pkg-plist # p5-WebService-NoPaste/distinfo # p5-WebService-NoPaste/files # p5-WebService-NoPaste/files/nox11patch-lib-WebService-NoPaste.pm # echo c - p5-WebService-NoPaste mkdir -p p5-WebService-NoPaste > /dev/null 2>&1 echo x - p5-WebService-NoPaste/pkg-descr sed 's/^X//' >p5-WebService-NoPaste/pkg-descr << 'END-of-p5-WebService-NoPaste/pkg-descr' XWhen online chatting it is problematic to paste an entire 300 line Xfile. Yes paste? No. NoPaste! X XPosting to a paste host is preferred. These servers are just web Xforms that accept input from a big text field, and temporarily house Xthem as web pages. X XThis script/module is for those who find it tedious to switch to a Xweb browser, load the page, and then paste. Why use the mouse when Xyou can use the keyboard? ;) When online chatting it is problematic Xto paste an entire 300 line file. Yes paste? No. NoPaste! X XPosting to a paste host is preferred. These servers are just web Xforms that accept input from a big text field, and temporarily house Xthem as web pages. X XThis script/module is for those who find it tedious to switch to a Xweb browser, load the page, and then paste. Why use the mouse when Xyou can use the keyboard? ;) X XAuthor: Ryan King <rking@panoptic.com> XWWW: http://search.cpan.org/dist/WebService-NoPaste/ END-of-p5-WebService-NoPaste/pkg-descr echo x - p5-WebService-NoPaste/Makefile sed 's/^X//' >p5-WebService-NoPaste/Makefile << 'END-of-p5-WebService-NoPaste/Makefile' X# New ports collection makefile for: p5-WebService-NoPaste X# Date created: 2005-12-26 X# Whom: Gea-Suan Lin <gslin@netnews.NCTU.edu.tw> X# X# $FreeBSD$ X# X XPORTNAME= WebService-NoPaste XPORTVERSION= 0.03 XCATEGORIES= www XMASTER_SITES= ${MASTER_SITE_PERL_CPAN} XMASTER_SITE_SUBDIR= WebService XPKGNAMEPREFIX= p5- X XMAINTAINER= gslin@gslin.org XCOMMENT= Post to Paste Web Pages X XBUILD_DEPENDS= ${SITE_PERL}/IO/All.pm:${PORTSDIR}/devel/p5-IO-All \ X ${SITE_PERL}/LWP/UserAgent.pm:${PORTSDIR}/www/p5-libwww \ X ${SITE_PERL}/Spiffy.pm:${PORTSDIR}/devel/p5-Spiffy XRUN_DEPENDS= ${BUILD_DEPENDS} X XPERL_CONFIGURE= yes X XOPTIONS= X11 "Enable X11 Clipboard support" off X X.include <bsd.port.pre.mk> X X.if defined(WITH_X11) XBUILD_DEPENDS+= ${SITE_PERL}/Clipboard.pm:${PORTSDIR}/x11/p5-Clipboard X.else XEXTRA_PATCHES+= ${PATCHDIR}/nox11patch-lib-WebService-NoPaste.pm X.endif X X.include <bsd.port.post.mk> END-of-p5-WebService-NoPaste/Makefile echo x - p5-WebService-NoPaste/pkg-plist sed 's/^X//' >p5-WebService-NoPaste/pkg-plist << 'END-of-p5-WebService-NoPaste/pkg-plist' X%%SITE_PERL%%/WebService/NoPaste.pm X@unexec rmdir %D/%%SITE_PERL%%/WebService 2>/dev/null || true X%%SITE_PERL%%/%%PERL_ARCH%%/auto/WebService/NoPaste/.packlist X@dirrm %%SITE_PERL%%/%%PERL_ARCH%%/auto/WebService/NoPaste X@unexec rmdir %D/%%SITE_PERL%%/%%PERL_ARCH%%/auto/WebService 2>/dev/null || true END-of-p5-WebService-NoPaste/pkg-plist echo x - p5-WebService-NoPaste/distinfo sed 's/^X//' >p5-WebService-NoPaste/distinfo << 'END-of-p5-WebService-NoPaste/distinfo' XMD5 (WebService-NoPaste-0.03.tar.gz) = 1113fd9f7a9de9ec5b8310b7aed1f8b6 XSHA256 (WebService-NoPaste-0.03.tar.gz) = 413a1eba3694cff66904941ba216ef25dddc259e4f17e8cfd75ddb4aaba2973d XSIZE (WebService-NoPaste-0.03.tar.gz) = 9773 END-of-p5-WebService-NoPaste/distinfo echo c - p5-WebService-NoPaste/files mkdir -p p5-WebService-NoPaste/files > /dev/null 2>&1 echo x - p5-WebService-NoPaste/files/nox11patch-lib-WebService-NoPaste.pm sed 's/^X//' >p5-WebService-NoPaste/files/nox11patch-lib-WebService-NoPaste.pm << 'END-of-p5-WebService-NoPaste/files/nox11patch-lib-WebService-NoPaste.pm' X--- lib/WebService/NoPaste.pm.orig Tue May 3 20:10:26 2005 X+++ lib/WebService/NoPaste.pm Mon Dec 26 18:45:18 2005 X@@ -3,7 +3,6 @@ X use LWP::UserAgent; X use HTTP::Request::Common 'POST'; X use IO::All; X-use Clipboard; X our $VERSION = '0.03'; X X sub new { X@@ -37,9 +36,9 @@ X io('-')->all X } X X-sub read_from_clipboard { Clipboard->paste } X+sub read_from_clipboard { } X X-sub save_to_clipboard { Clipboard->copy($_[0]); } X+sub save_to_clipboard { } X X my $PLEASE_EMAIL = "WebService::NoPaste has only been tested with 'pastebot' brand paste servers, and even then only to a limited extent. If you got this error unexpectedly, please let me know - rking\@panopic.com."; X sub response_die { X@@ -57,14 +56,6 @@ X X # Manually paste input, manually copy the result url: X $ nopaste X- X- # Turbo mode: use clipboard as input, send, and then put the result X- # URL back into the clipboard: X- $ nopaste cp X- X- # Just take the input from the clipboard, but otherwise leave the X- # clipboard alone: X- $ nopaste c X X # Instantly upload your passwd file for the whole world to see, but X # at least you'll have the result URL conveniently in your END-of-p5-WebService-NoPaste/files/nox11patch-lib-WebService-NoPaste.pm exit --- p5-WebService-NoPaste-0.03.shar ends here --- >Release-Note: >Audit-Trail: >Unformatted:
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?20051226105031.14A91240>