diff options
| author | Frederic Crozat <fcrozat@mandriva.com> | 2007-03-30 16:50:51 +0000 |
|---|---|---|
| committer | Frederic Crozat <fcrozat@mandriva.com> | 2007-03-30 16:50:51 +0000 |
| commit | 731140fa1757af187b99683cb294438b7249cdc1 (patch) | |
| tree | 0581066b8028438f68f8c599ec7c74229a879154 /trunk/sbin/convertsession | |
| parent | 44b5f83a6dcd9d5b69478ccf5daf7c6d349f2573 (diff) | |
| parent | 5ca50c94b5fac4999894999da080c806cefcb344 (diff) | |
| download | common-data-731140fa1757af187b99683cb294438b7249cdc1.tar common-data-731140fa1757af187b99683cb294438b7249cdc1.tar.gz common-data-731140fa1757af187b99683cb294438b7249cdc1.tar.bz2 common-data-731140fa1757af187b99683cb294438b7249cdc1.tar.xz common-data-731140fa1757af187b99683cb294438b7249cdc1.zip | |
V2007_1_9mdvV2007_1_9mdv
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++; -} |