base/init: do not poll cdrom, if kernel supports polling

modules.d/99base/init

@@ -203,13 +203,15 @@ while :; do
     # dirty hack for some cdrom drives,
     # which report no medium for quiet
     # some time.
-    for cdrom in /sys/block/sr*; do
-        [ -e "$cdrom" ] || continue
-        # skip, if cdrom medium was already found
-        strstr "$(udevadm info --query=env --path=${cdrom##/sys})" \
-            ID_CDROM_MEDIA && continue
-        echo change > "$cdrom/uevent"        
-    done
+    if [ ! -e /sys/module/block/parameters/events_dfl_poll_msecs ]; then
+        for cdrom in /sys/block/sr*; do
+            [ -e "$cdrom" ] || continue       
+            # skip, if cdrom medium was already found
+            strstr "$(udevadm info --query=env --path=${cdrom##/sys})" \
+                ID_CDROM_MEDIA && continue
+            echo change > "$cdrom/uevent"        
+        done
+    fi
     
     i=$(($i+1))
     [ $i -gt $RDRETRY ] \