From 086ede9a82de999ddcc3914f18240806c4d7668e Mon Sep 17 00:00:00 2001
From: blundellc <blundellc@edb9625f-4e0d-4859-8d74-9fd3b1da38cb>
Date: Sat, 13 Sep 2008 13:18:20 +0000
Subject: [PATCH] license+sysreq: assign *after* checking the element exists
 (oops).

git-svn-id: svn://svn.r-forge.r-project.org/svnroot/cran2deb@58 edb9625f-4e0d-4859-8d74-9fd3b1da38cb
---
 pkg/trunk/exec/license | 2 +-
 pkg/trunk/exec/sysreq  | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/pkg/trunk/exec/license b/pkg/trunk/exec/license
index e9fa64a..fd4c53b 100755
--- a/pkg/trunk/exec/license
+++ b/pkg/trunk/exec/license
@@ -7,10 +7,10 @@ exec_cmd <- function(argc, argv) {
     usage <- function()
         message('usage: add <license> [deny]|file <license> <path>|ls|quit|help')
 
-    cmd = argv[1]
     if (argc < 1) {
         exit()
     }
+    cmd = argv[1]
 
     if (cmd == 'add') {
         if (argc != 2 && (argc != 3 || argv[3] != 'deny')) {
diff --git a/pkg/trunk/exec/sysreq b/pkg/trunk/exec/sysreq
index b9c464e..ce2fc73 100755
--- a/pkg/trunk/exec/sysreq
+++ b/pkg/trunk/exec/sysreq
@@ -7,10 +7,10 @@ exec_cmd <- function(argc, argv) {
     usage <- function()
         message('usage: add <debianpkg> <sysreq>|ls|quit|help')
 
-    cmd = argv[1]
     if (argc < 1) {
         exit()
     }
+    cmd = argv[1]
 
     if (cmd == 'add') {
         if (argc < 3) {
-- 
2.39.2