Removed warning when deleting questions with no states

diff --git a/lib/questionlib.php b/lib/questionlib.php
index 6029898a12cefd9e10fd9d5fcc9b2c5a27361612..be1a7d9b6c44847554393a8aab6b73656900017b 100644 (file)
--- a/lib/questionlib.php
+++ b/lib/questionlib.php
@@ -364,12 +364,13 @@ function delete_question($questionid) {
         echo "Question with id $questionid does not exist.<br />";
     }
 
-    $states = get_records('question_states', 'question', $questionid);
-    $stateslist = implode(',', array_keys($states));
-
-    // delete questiontype-specific data
-    foreach ($QTYPES as $qtype) {
-        $qtype->delete_states($stateslist);
+    if ($states = get_records('question_states', 'question', $questionid)) {
+        $stateslist = implode(',', array_keys($states));
+    
+        // delete questiontype-specific data
+        foreach ($QTYPES as $qtype) {
+            $qtype->delete_states($stateslist);
+        }
     }
 
     // delete entries from all other question tables