[BUGFIX] Prevent to create empty categories

Resources/Private/Language/de.locallang.xml

@@ -125,6 +125,7 @@
 			<label index="tx_dftools_domain_model_redirecttestcategory.categoryExists">Der Kategorie-Bezeichner &quot;%1$s&quot; ist bereits in Verwendung!</label>
 			<label index="tx_dftools_domain_model_redirecttestcategory.categoryForm">Kategorie-Formular</label>
 			<label index="tx_dftools_domain_model_redirecttestcategory.edit">Kategorie bearbeiten</label>
+			<label index="tx_dftools_domain_model_redirecttestcategory.invalidDefaultCategory.message">Es konnte keine Default-Kategorie gefunden werden!</label>
 			<label index="tx_dftools_domain_model_redirecttestcategory.massDeleteQuestion.message">Möchten Sie wirklich alle ungenutzen Kategorien löschen?</label>
 			<label index="tx_dftools_domain_model_redirecttestcategory.massDeleteQuestion.title">Massenlöschung</label>
 			<label index="tx_dftools_domain_model_redirecttestcategory.removeUnusedCategories">Entferne ungenutzte Kategorien</label>

Resources/Private/Language/locallang.xml

@@ -132,6 +132,7 @@
 			<label index="tx_dftools_domain_model_redirecttestcategory.categoryExists">The category title &quot;%1$s&quot; is already in use!</label>
 			<label index="tx_dftools_domain_model_redirecttestcategory.categoryForm">Category Form</label>
 			<label index="tx_dftools_domain_model_redirecttestcategory.edit">Edit category</label>
+			<label index="tx_dftools_domain_model_redirecttestcategory.invalidDefaultCategory.message">Could not find a default category!</label>
 			<label index="tx_dftools_domain_model_redirecttestcategory.massDeleteQuestion.message">Do you really want to delete all unused categories?</label>
 			<label index="tx_dftools_domain_model_redirecttestcategory.massDeleteQuestion.title">Mass Delete</label>
 			<label index="tx_dftools_domain_model_redirecttestcategory.removeUnusedCategories">Remove Unused Categories</label>

Resources/Public/Scripts/RedirectTest/App.js

@@ -203,17 +203,25 @@ TYPO3.DfTools.RedirectTest.App = Ext.extend(TYPO3.DfTools.AbstractApp, {
 	 */
 	onAddRecord: function() {
 		this.changeVisibilityOfCategoryColumn(false);
-		var redirectTest = new TYPO3.DfTools.RedirectTest.Model({
-			__identity: 0,
-			categoryId: 0,
-			testResult: 0,
-			testMessage: '',
-			testUrl: '/',
-			expectedUrl: '/',
-			httpStatusCode: 200
-		});
-
-		this.grid.addRecord(redirectTest);
+		var defaultCategory = this.categoryStore.getAt(0),
+			header = TYPO3.lang['tx_dftools_common.exception'],
+			message = TYPO3.lang['tx_dftools_domain_model_redirecttestcategory.invalidDefaultCategory.message'];
+
+		if (typeof defaultCategory === 'undefined') {
+			top.TYPO3.Notification.showMessage(header, message, TYPO3.Severity.error);
+		} else {
+			var redirectTest = new TYPO3.DfTools.RedirectTest.Model({
+				__identity: 0,
+				categoryId: parseInt(defaultCategory.id),
+				testResult: 0,
+				testMessage: '',
+				testUrl: '/',
+				expectedUrl: '/',
+				httpStatusCode: 200
+			});
+
+			this.grid.addRecord(redirectTest);
+		}
 	},
 
 	/**