From: blundellc <blundellc@edb9625f-4e0d-4859-8d74-9fd3b1da38cb>
Date: Sat, 13 Sep 2008 13:28:43 +0000 (+0000)
Subject: typo! if length is *less* than one, then substitute.
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=6ffabe7cc0d4d29c97c77819426445b38cc9b68b;p=cran2deb.git

typo! if length is *less* than one, then substitute.

git-svn-id: svn://svn.r-forge.r-project.org/svnroot/cran2deb@140 edb9625f-4e0d-4859-8d74-9fd3b1da38cb
---

diff --git a/pkg/trunk/R/debcontrol.R b/pkg/trunk/R/debcontrol.R
index 63d0bf0..84d9933 100644
--- a/pkg/trunk/R/debcontrol.R
+++ b/pkg/trunk/R/debcontrol.R
@@ -146,7 +146,7 @@ generate_control <- function(pkg) {
         long_descr <- pkg$description[1,'Description']
     }
 
-    if (length(long_descr)) {
+    if (length(long_descr) < 1) {
         # bypass lintian extended-description-is-empty for which we care not.
         long_descr <- paste('The author/maintainer of this package'
                            ,'did not care to enter a longer description.')