Package: hpodder Version: 1.1.5.0 Severity: wishlist Tags: patch Hi, Attached is a working (I hope) patch for hpodder 1.1.5 which adds the "EPID" to the id3v2 callout. This is great for allowing sorting by episode ID in things like gtkpod.
Also fixed the "FEEDURL" which has a typo (FEDDURL) in the Config.hs file. Hope this helps, Christian -- System Information: Debian Release: lenny/sid APT prefers feisty APT policy: (500, 'feisty'), (500, 'unstable'), (500, 'testing'), (1, 'experimental') Architecture: amd64 (x86_64) Kernel: Linux 2.6.25-2-amd64 (SMP w/4 CPU cores) Locale: LANG=en_CA.UTF-8, LC_CTYPE=en_CA.UTF-8 (charmap=UTF-8) Shell: /bin/sh linked to /bin/bash Versions of packages hpodder depends on: ii curl 7.18.2-5 Get a file from an HTTP, HTTPS or ii id3v2 0.1.11-3 A command line id3v2 tag editor ii libc6 2.7-12 GNU C Library: Shared libraries ii libgmp3c2 2:4.2.2+dfsg-3 Multiprecision arithmetic library ii libsqlite3-0 3.5.9-3 SQLite 3 shared library hpodder recommends no packages. -- no debconf information
diff -aur hpodder-1.1.5.0/Commands/Download.hs hpodder-1.1.5.0+1/Commands/Download.hs --- hpodder-1.1.5.0/Commands/Download.hs 2008-07-02 11:29:00.000000000 -0400 +++ hpodder-1.1.5.0+1/Commands/Download.hs 2008-07-03 23:40:36.000000000 -0400 @@ -284,6 +284,7 @@ ("FEEDURL", feedurl . podcast $ ep), ("SAFECASTTITLE", sanitize_fn . castname . podcast $ ep), ("SAFEEPTITLE", sanitize_fn . eptitle $ ep), + ("EPID", show . epid $ ep), ("EPTITLE", eptitle ep)] -- | Runs a hook script. diff -aur hpodder-1.1.5.0/Config.hs hpodder-1.1.5.0+1/Config.hs --- hpodder-1.1.5.0/Config.hs 2008-04-08 15:20:54.000000000 -0400 +++ hpodder-1.1.5.0+1/Config.hs 2008-07-03 23:42:52.000000000 -0400 @@ -74,7 +74,7 @@ cp <- set cp "DEFAULT" "renametypes" "audio/mpeg:.mp3,audio/mp3:.mp3,x-audio/mp3:.mp3" cp <- set cp "DEFAULT" "postproctypes" "audio/mpeg,audio/mp3,x-audio/mp3" cp <- set cp "DEFAULT" "gettypecommand" "file -b -i \"${EPFILENAME}\"" - cp <- set cp "DEFAULT" "postproccommand" "id3v2 -A \"${CASTTITLE}\" -t \"${EPTITLE}\" --WOAF \"${EPURL}\" --WOAS \"${FEDDURL}\" \"${EPFILENAME}\"" + cp <- set cp "DEFAULT" "postproccommand" "id3v2 -T \"${EPID}\" -A \"${CASTTITLE}\" -t \"${EPTITLE}\" --WOAF \"${EPURL}\" --WOAS \"${FEEDURL}\" \"${EPFILENAME}\"" return cp startingcp = emptyCP {accessfunc = interpolatingAccess 10} @@ -114,4 +114,4 @@ Right x -> Just (splitit x) Left _ -> Nothing where splitit x = filter (/= "") . map strip . split "," $ x