From 84ec75bd10ba0b314f93ba82f5a497c15777e375 Mon Sep 17 00:00:00 2001 From: Joachim Breitner Date: Tue, 12 Jun 2007 18:04:24 +0000 Subject: [PATCH] Description defaults to Name --- Parse.pm | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/Parse.pm b/Parse.pm index ff7fa95..a16d745 100644 --- a/Parse.pm +++ b/Parse.pm @@ -19,6 +19,12 @@ sub parse { die "Cannot parse $!"; } } + + if (not exists $parsed{Description}) { + $parsed{Description} = $parsed{Name} + } + + return %parsed; } -- 2.20.1