From patchwork Sun Jan 8 14:09:21 2006 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit X-Patchwork-Submitter: Dave P X-Patchwork-Id: 12141 Received: from sodom.pickles.me.uk ([217.155.3.209]) by www.linuxtv.org with esmtp (Exim 4.50) id 1EvbF2-00079n-E4 for vdr@linuxtv.org; Sun, 08 Jan 2006 15:09:52 +0100 Received: from sodom.pickles.me.uk (localhost [127.0.0.1]) by sodom.pickles.me.uk (8.13.4/8.12.11) with ESMTP id k08E9LjX026222 for ; Sun, 8 Jan 2006 14:09:21 GMT Received: from localhost (localhost [[UNIX: localhost]]) by sodom.pickles.me.uk (8.13.4/8.13.4/Submit) id k08E9LZn026221 for vdr@linuxtv.org; Sun, 8 Jan 2006 14:09:21 GMT From: Dave P To: vdr@linuxtv.org Subject: Re: [vdr] VDR version 1.3.38 incompatible with vdradmin? Date: Sun, 8 Jan 2006 14:09:21 +0000 User-Agent: KMail/1.8.2 References: <43C106F3.9070604@cadsoft.de> <200601081346.13034.vdr@pickles.me.uk> <43C118DF.3020004@cadsoft.de> In-Reply-To: <43C118DF.3020004@cadsoft.de> MIME-Version: 1.0 Content-Disposition: inline Message-Id: <200601081409.21644.vdr@pickles.me.uk> X-BeenThere: vdr@linuxtv.org X-Mailman-Version: 2.1.5 Precedence: list Reply-To: VDR Mailing List List-Id: VDR Mailing List List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-List-Received-Date: Sun, 08 Jan 2006 14:09:52 -0000 Status: O X-Status: X-Keywords: X-UID: 7029 On Sunday 08 Jan 2006 13:51, Klaus Schmidinger wrote: > The version number of EPG events is now also stored in the epg.data > file. Sorry, I forgot to mention that this, of course, also has an > impact on the LSTE command. OK, here's a quick-and-dirty patch to restore functionality to vdradmin 0.97-am3.4.2 (this will word-wrap). my($title, $subtitle, $summary); while($_ = $SVDRP->readoneline) { It's also compatible with earlier versions. --- vdradmind.pl 2005-12-10 12:17:01.000000000 +0000 +++ vdradmind.my.pl 2006-01-08 14:02:42.000000000 +0000 @@ -735,7 +735,7 @@ else { $bc++; while($_ = $SVDRP->readoneline) { - if(/^E (.*) (.*) (.*) (.*)/ || /^E (.*) (.*) (.*)/) { + if(/^E (.*?) (.*?) (.*?) /) { my($event_id, $time, $duration) = ($1, $2, $3);