From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <at@altlinux.ru>
Date: Tue, 25 Nov 2003 22:19:15 +0300
From: Alexey Tourbin <at@altlinux.ru>
To: devel-kernel@altlinux.org
Message-ID: <20031125191915.GR2377@julia.office.altlinux.ru>
Mail-Followup-To: devel-kernel@altlinux.org
References: <20031125140935.GJ2377@julia.office.altlinux.ru>
	<20031125141644.GC22171@master.mivlgu.local>
	<20031125142522.GK2377@julia.office.altlinux.ru>
	<20031125143609.GL2377@julia.office.altlinux.ru>
Mime-Version: 1.0
Content-Type: multipart/signed; micalg=pgp-sha1;
	protocol="application/pgp-signature"; boundary="ngPZezdD7QsvFaqQ"
Content-Disposition: inline
In-Reply-To: <20031125143609.GL2377@julia.office.altlinux.ru>
Cc: 
Subject: [d-kernel] Re: Fwd: [Bug 3318] New:
	=?koi8-r?b?8NLJINXT1MHOz9fLxSDMwMLPx88g?=
	=?koi8-r?b?0cTSwSDOxSDQ0s/QydPZ18HF1NPRINPPz9TXxdPU19XA3cHRINPF?=
	=?koi8-r?b?y8PJ0SDXIM3FzsA=?= grub
X-BeenThere: devel-kernel@altlinux.ru
X-Mailman-Version: 2.1.3
Precedence: list
Reply-To: ALT Linux kernel packages development <devel-kernel@altlinux.ru>
List-Id: ALT Linux kernel packages development <devel-kernel.altlinux.ru>
List-Unsubscribe: <listinfo/devel-kernel>,
	<mailto:devel-kernel-request@altlinux.ru?subject=unsubscribe>
List-Archive: </pipermail/devel-kernel>
List-Post: <mailto:devel-kernel@altlinux.ru>
List-Help: <mailto:devel-kernel-request@altlinux.ru?subject=help>
List-Subscribe: <listinfo/devel-kernel>,
	<mailto:devel-kernel-request@altlinux.ru?subject=subscribe>
X-List-Received-Date: Tue, 25 Nov 2003 19:19:16 -0000
Archived-At: <http://lore.altlinux.org/devel-kernel/20031125191915.GR2377@julia.office.altlinux.ru/>
List-Archive: <http://lore.altlinux.org/devel-kernel/>
List-Post: <mailto:devel-kernel@altlinux.org>


--ngPZezdD7QsvFaqQ
Content-Type: text/plain; charset=koi8-r
Content-Disposition: inline
Content-Transfer-Encoding: 8bit

On Tue, Nov 25, 2003 at 05:36:09PM +0300, Alexey Tourbin wrote:
> --- /usr/share/loader/grub-	2003-03-19 17:41:06 +0300
> +++ /usr/share/loader/grub	2003-11-25 17:34:24 +0300
> @@ -154,6 +154,7 @@ sub get_boot_partitions {
>      local *F;
>      open F, '/etc/fstab'; 
>      while (<F>) {
> +	next if /^#/;
>   	my @s = split ' ';
>  	$part = $s[0] if $s[1] =~ m|/$| and not $part;
>  	if ($s[1] =~ m|/boot$|) {
> 
> Вообще, там есть что по части перла зафиксить.
> Или на shell'е переписать.

В mdk юмористы (сравниваю с новой версией):

@@ -154,7 +187,7 @@ sub get_boot_partitions {
     local *F;
     open F, '/etc/fstab';
     while (<F>) {
-       next if /^#/;
+       s/#.*//;
        my @s = split ' ';
        $part = $s[0] if $s[1] =~ m|/$| and not $part;
        if ($s[1] =~ m|/boot$|) {

hackish

--ngPZezdD7QsvFaqQ
Content-Type: application/pgp-signature
Content-Disposition: inline

-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.2.3 (GNU/Linux)

iD8DBQE/w6szfBKgtDjnu0YRAv01AKDNTApGgCimdGl64cbc8xfv3rG66wCfRgcG
RBv/s0NGYJzlaUEzfp3Yerc=
=3v6Q
-----END PGP SIGNATURE-----

--ngPZezdD7QsvFaqQ--