r39944 - in /trunk/libapp-nopaste-perl/debian/patches: ./ debian_lang.patch series
gregoa at users.alioth.debian.org
gregoa at users.alioth.debian.org
Wed Jul 15 14:10:41 UTC 2009
Author: gregoa
Date: Wed Jul 15 14:10:22 2009
New Revision: 39944
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=39944
Log:
tentative patch, not hooked up yet: debian_lang.patch (add lang support for paste.debian.net)
Added:
trunk/libapp-nopaste-perl/debian/patches/
trunk/libapp-nopaste-perl/debian/patches/debian_lang.patch
trunk/libapp-nopaste-perl/debian/patches/series
Added: trunk/libapp-nopaste-perl/debian/patches/debian_lang.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libapp-nopaste-perl/debian/patches/debian_lang.patch?rev=39944&op=file
==============================================================================
--- trunk/libapp-nopaste-perl/debian/patches/debian_lang.patch (added)
+++ trunk/libapp-nopaste-perl/debian/patches/debian_lang.patch Wed Jul 15 14:10:22 2009
@@ -1,0 +1,448 @@
+Author: gregor herrmann <gregoa at debian.org>
+Description: add lang support to App::Nopaste::Service::Debian
+
+--- a/lib/App/Nopaste/Service/Debian.pm
++++ b/lib/App/Nopaste/Service/Debian.pm
+@@ -3,18 +3,442 @@
+ use warnings;
+ use base 'App::Nopaste::Service';
+
++my $languages = {
++ "Plain" => "-1",
++ "a65" => "3",
++ "aap" => "4",
++ "abaqus" => "5",
++ "abc" => "6",
++ "abel" => "7",
++ "acedb" => "8",
++ "ada" => "9",
++ "aflex" => "10",
++ "ahdl" => "11",
++ "alsaconf" => "12",
++ "amiga" => "13",
++ "aml" => "14",
++ "ampl" => "15",
++ "antlr" => "16",
++ "ant" => "17",
++ "apachestyle" => "18",
++ "apache" => "19",
++ "arch" => "20",
++ "art" => "21",
++ "asm68k" => "22",
++ "asmh8300" => "23",
++ "asm" => "24",
++ "asn" => "25",
++ "aspperl" => "26",
++ "aspvbs" => "27",
++ "asterisk" => "28",
++ "atlas" => "29",
++ "automake" => "30",
++ "ave" => "31",
++ "awk" => "32",
++ "ayacc" => "33",
++ "baan" => "34",
++ "basic" => "35",
++ "bc" => "36",
++ "bdf" => "37",
++ "bib" => "38",
++ "bindzone" => "39",
++ "blank" => "40",
++ "btm" => "41",
++ "b" => "42",
++ "calendar" => "43",
++ "catalog" => "44",
++ "cdl" => "45",
++ "cfg" => "46",
++ "cf" => "47",
++ "changelog" => "48",
++ "change" => "49",
++ "chaskell" => "50",
++ "cheetah" => "51",
++ "chill" => "52",
++ "ch" => "53",
++ "clean" => "54",
++ "clipper" => "55",
++ "cl" => "56",
++ "cobol" => "57",
++ "colortest" => "58",
++ "config" => "59",
++ "conf" => "60",
++ "cpp" => "61",
++ "crm" => "62",
++ "crontab" => "63",
++ "csc" => "64",
++ "csh" => "65",
++ "csp" => "66",
++ "css" => "67",
++ "cs" => "68",
++ "cterm" => "69",
++ "ctrlh" => "70",
++ "cuplsim" => "71",
++ "cupl" => "72",
++ "c" => "73",
++ "cvsrc" => "74",
++ "cvs" => "75",
++ "cweb" => "76",
++ "cynlib" => "77",
++ "cynpp" => "78",
++ "dcd" => "79",
++ "dcl" => "80",
++ "debchangelog" => "81",
++ "debcontrol" => "82",
++ "debsources" => "83",
++ "def" => "84",
++ "desc" => "85",
++ "desktop" => "86",
++ "diff" => "87",
++ "dircolors" => "88",
++ "diva" => "89",
++ "dns" => "90",
++ "docbksgml" => "91",
++ "docbk" => "92",
++ "docbkxml" => "93",
++ "dosbatch" => "94",
++ "dosini" => "95",
++ "dot" => "96",
++ "dracula" => "97",
++ "dsl" => "98",
++ "dtd" => "99",
++ "dtml" => "100",
++ "d" => "101",
++ "dylanintr" => "102",
++ "dylanlid" => "103",
++ "dylan" => "104",
++ "ecd" => "105",
++ "edif" => "106",
++ "eiffel" => "107",
++ "elf" => "108",
++ "elinks" => "109",
++ "elmfilt" => "110",
++ "erlang" => "111",
++ "eruby" => "112",
++ "esmtprc" => "113",
++ "esqlc" => "114",
++ "esterel" => "115",
++ "eterm" => "116",
++ "exim" => "117",
++ "expect" => "118",
++ "exports" => "119",
++ "fasm" => "120",
++ "fdcc" => "121",
++ "fetchmail" => "122",
++ "fgl" => "123",
++ "focexec" => "124",
++ "form" => "125",
++ "forth" => "126",
++ "fortran" => "127",
++ "foxpro" => "128",
++ "fstab" => "129",
++ "fvwm2m4" => "130",
++ "fvwm" => "131",
++ "gdb" => "132",
++ "gdmo" => "133",
++ "gedcom" => "134",
++ "gkrellmrc" => "135",
++ "gnuplot" => "136",
++ "gpg" => "137",
++ "gp" => "138",
++ "grads" => "139",
++ "groff" => "140",
++ "grub" => "141",
++ "gsp" => "142",
++ "gtkrc" => "143",
++ "haskell" => "144",
++ "hb" => "145",
++ "help" => "146",
++ "hercules" => "147",
++ "hex" => "148",
++ "hitest" => "149",
++ "hog" => "150",
++ "htmlcheetah" => "151",
++ "htmlm4" => "152",
++ "htmlos" => "153",
++ "html" => "154",
++ "ia64" => "155",
++ "icemenu" => "156",
++ "icon" => "157",
++ "idlang" => "158",
++ "idl" => "159",
++ "indent" => "160",
++ "inform" => "161",
++ "inittab" => "162",
++ "ipfilter" => "163",
++ "ishd" => "164",
++ "iss" => "165",
++ "ist" => "166",
++ "jal" => "167",
++ "jam" => "168",
++ "jargon" => "169",
++ "javacc" => "170",
++ "javascript" => "171",
++ "java" => "172",
++ "jess" => "173",
++ "jgraph" => "174",
++ "jproperties" => "175",
++ "jsp" => "176",
++ "kix" => "177",
++ "kscript" => "178",
++ "kwt" => "179",
++ "lace" => "180",
++ "latte" => "181",
++ "ldif" => "182",
++ "lex" => "183",
++ "lftp" => "184",
++ "lhaskell" => "185",
++ "libao" => "186",
++ "lifelines" => "187",
++ "lilo" => "188",
++ "lisp" => "189",
++ "lite" => "190",
++ "logtalk" => "191",
++ "lotos" => "192",
++ "lout" => "193",
++ "lpc" => "194",
++ "lprolog" => "195",
++ "lscript" => "196",
++ "lss" => "197",
++ "lua" => "198",
++ "lynx" => "199",
++ "m4" => "200",
++ "mailcap" => "201",
++ "mail" => "202",
++ "make" => "203",
++ "manual" => "204",
++ "man" => "205",
++ "maple" => "206",
++ "masm" => "207",
++ "mason" => "208",
++ "master" => "209",
++ "matlab" => "210",
++ "mel" => "211",
++ "mf" => "212",
++ "mgp" => "213",
++ "mib" => "214",
++ "mma" => "215",
++ "mmix" => "216",
++ "modconf" => "217",
++ "model" => "218",
++ "modsim3" => "219",
++ "modula2" => "220",
++ "modula3" => "221",
++ "monk" => "222",
++ "moo" => "223",
++ "mplayerconf" => "224",
++ "mp" => "225",
++ "msidl" => "226",
++ "msql" => "227",
++ "mush" => "228",
++ "muttrc" => "229",
++ "mysql" => "230",
++ "named" => "231",
++ "nasm" => "232",
++ "nastran" => "233",
++ "natural" => "234",
++ "ncf" => "235",
++ "netrc" => "236",
++ "nosyntax" => "237",
++ "nqc" => "238",
++ "nroff" => "239",
++ "nsis" => "240",
++ "objcpp" => "241",
++ "objc" => "242",
++ "ocaml" => "243",
++ "occam" => "244",
++ "omnimark" => "245",
++ "openroad" => "246",
++ "opl" => "247",
++ "ora" => "248",
++ "papp" => "249",
++ "pascal" => "250",
++ "pcap" => "251",
++ "pccts" => "252",
++ "perl" => "253",
++ "pfmain" => "254",
++ "pf" => "255",
++ "php" => "256",
++ "phtml" => "257",
++ "pic" => "258",
++ "pike" => "259",
++ "pilrc" => "260",
++ "pine" => "261",
++ "pinfo" => "262",
++ "plm" => "263",
++ "plp" => "264",
++ "plsql" => "265",
++ "pod" => "266",
++ "postscr" => "267",
++ "po" => "268",
++ "povini" => "269",
++ "pov" => "270",
++ "ppd" => "271",
++ "ppwiz" => "272",
++ "prescribe" => "273",
++ "procmail" => "274",
++ "progress" => "275",
++ "prolog" => "276",
++ "psf" => "277",
++ "ptcap" => "278",
++ "purifylog" => "279",
++ "pyrex" => "280",
++ "python" => "281",
++ "qf" => "282",
++ "quake" => "283",
++ "radiance" => "284",
++ "ratpoison" => "285",
++ "rcslog" => "286",
++ "rcs" => "287",
++ "rc" => "288",
++ "readline" => "289",
++ "rebol" => "291",
++ "registry" => "292",
++ "remind" => "293",
++ "resolv" => "294",
++ "rexx" => "295",
++ "rib" => "296",
++ "rnc" => "297",
++ "robots" => "298",
++ "rpcgen" => "299",
++ "rpl" => "300",
++ "rst" => "301",
++ "rtf" => "302",
++ "ruby" => "303",
++ "r" => "304",
++ "samba" => "305",
++ "sas" => "306",
++ "sather" => "307",
++ "scheme" => "308",
++ "scilab" => "309",
++ "screen" => "310",
++ "sdl" => "311",
++ "sed" => "312",
++ "sendpr" => "313",
++ "sgmldecl" => "314",
++ "sgmllnx" => "315",
++ "sgml" => "316",
++ "sh" => "317",
++ "sicad" => "318",
++ "simula" => "319",
++ "sindacmp" => "320",
++ "sindaout" => "321",
++ "sinda" => "322",
++ "skill" => "323",
++ "slang" => "324",
++ "slice" => "325",
++ "slrnrc" => "326",
++ "slrnsc" => "327",
++ "sl" => "328",
++ "smarty" => "329",
++ "smil" => "330",
++ "smith" => "331",
++ "sml" => "332",
++ "sm" => "333",
++ "snnsnet" => "334",
++ "snnspat" => "335",
++ "snnsres" => "336",
++ "snobol4" => "337",
++ "specman" => "338",
++ "spec" => "339",
++ "spice" => "340",
++ "splint" => "341",
++ "spup" => "342",
++ "spyce" => "343",
++ "sqlforms" => "344",
++ "sqlj" => "345",
++ "sql" => "346",
++ "sqr" => "347",
++ "squid" => "348",
++ "sshconfig" => "349",
++ "sshdconfig" => "350",
++ "stp" => "351",
++ "strace" => "352",
++ "st" => "353",
++ "sudoers" => "354",
++ "svn" => "355",
++ "syncolor" => "356",
++ "synload" => "357",
++ "syntax" => "358",
++ "tads" => "359",
++ "tags" => "360",
++ "takcmp" => "361",
++ "takout" => "362",
++ "tak" => "363",
++ "tasm" => "364",
++ "tcl" => "365",
++ "tcsh" => "366",
++ "terminfo" => "367",
++ "texinfo" => "368",
++ "texmf" => "369",
++ "tex" => "370",
++ "tf" => "371",
++ "tidy" => "372",
++ "tilde" => "373",
++ "tli" => "374",
++ "tpp" => "375",
++ "trasys" => "376",
++ "tsalt" => "377",
++ "tsscl" => "378",
++ "tssgm" => "379",
++ "tssop" => "380",
++ "uc" => "381",
++ "uil" => "382",
++ "valgrind" => "383",
++ "vb" => "384",
++ "verilogams" => "385",
++ "verilog" => "386",
++ "vgrindefs" => "387",
++ "vhdl" => "388",
++ "viminfo" => "389",
++ "vim" => "390",
++ "virata" => "391",
++ "vmasm" => "392",
++ "vrml" => "393",
++ "vsejcl" => "394",
++ "wdiff" => "395",
++ "webmacro" => "396",
++ "web" => "397",
++ "wget" => "398",
++ "whitespace" => "399",
++ "winbatch" => "400",
++ "wml" => "401",
++ "wsh" => "402",
++ "wvdial" => "403",
++ "xdefaults" => "404",
++ "xf86conf" => "405",
++ "xhtml" => "406",
++ "xkb" => "407",
++ "xmath" => "408",
++ "xml" => "409",
++ "xmodmap" => "410",
++ "xpm2" => "411",
++ "xpm" => "412",
++ "xsd" => "413",
++ "xslt" => "414",
++ "xs" => "415",
++ "xxd" => "416",
++ "yacc" => "417",
++ "yaml" => "418",
++ "z8a" => "419",
++ "zsh" => "420",
++ "Plain" => "421",
++};
++
+ sub uri { "http://paste.debian.net/" }
+
+ sub fill_form {
+ my $self = shift;
+ my $mech = shift;
+ my %args = @_;
++ my $lang = $languages->{$args{lang}} if $args{lang};
+
+ $mech->form_number(1);
+ $mech->submit_form(
+ fields => {
+ code => $args{text},
+ do { $args{nick} ? (poster => $args{nick}) : () },
++ do { $lang ? (lang => $lang) : () },
+ },
+ );
+ }
Added: trunk/libapp-nopaste-perl/debian/patches/series
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libapp-nopaste-perl/debian/patches/series?rev=39944&op=file
==============================================================================
--- trunk/libapp-nopaste-perl/debian/patches/series (added)
+++ trunk/libapp-nopaste-perl/debian/patches/series Wed Jul 15 14:10:22 2009
@@ -1,0 +1,1 @@
+debian_lang.patch
More information about the Pkg-perl-cvs-commits
mailing list