diff options
Diffstat (limited to 'trunk/sbin/convertsession')
-rw-r--r-- | trunk/sbin/convertsession | 31 |
1 files changed, 0 insertions, 31 deletions
diff --git a/trunk/sbin/convertsession b/trunk/sbin/convertsession deleted file mode 100644 index 05ea57e..0000000 --- a/trunk/sbin/convertsession +++ /dev/null @@ -1,31 +0,0 @@ -#!/usr/bin/perl -# -*- Mode: cperl -*- -# Copyright (C) 2000 by Chmouel Boudjnah <chmouel@mandriva.com> -# Redistribution of this file is permitted under the terms of the GNU -# Public License (GPL) -## description: Convert a file /etc/X11/window-managers to a -## /etc/X11/wmsession.d/ style files. - -my $dir = '/etc/X11/wmsession.d/'; - -if ($ARGV[0] =~ /-f/ ) { - $file = $ARGV[1]; -} else { - $file = '/etc/X11/window-managers'; -} - -my $cnt = 0; - -open F, $file or die "Can't open $file\n"; -while (<F>) { - $/ = "--@@--"; - s|--@@--||g; - if ($cnt != 0) { - $content = "$_"; - $n = $1 if /^NAME=(.*)/m; - open C, ">$dir/$cnt$n" or die "Can't open $dir/$cnt$n\n"; - print C $content; - close C; - } - $cnt++; -} |