unbreak non-DEAlgorithm solver handling

Author: avik-pal

Project.toml

@@ -1,7 +1,7 @@
 name = "DiffEqBase"
 uuid = "2b5f629d-d688-5b77-993f-72d75c75574e"
 authors = ["Chris Rackauckas <[email protected]>"]
-version = "6.130.4"
+version = "6.130.5"
 
 [deps]
 ArrayInterface = "4fba245c-0d91-5ea0-9b3e-6abc04ee57a9"

src/solve.jl

@@ -1427,8 +1427,8 @@ function _solve_adjoint(prob, sensealg, u0, p, originator, args...; merge_callba
         alg = args[1]
         alg, get_concrete_problem(prob, isadaptive(alg); u0 = u0, p = p, kwargs...)
     else # Default algorithm handling
-        alg = !(typeof(prob) <: DiscreteProblem)
-        alg, get_concrete_problem(prob, alg; u0 = u0, p = p,
+        alg = isempty(args) ? nothing : args[1]
+        alg, get_concrete_problem(prob, !(typeof(prob) <: DiscreteProblem); u0 = u0, p = p,
             kwargs...)
     end
 
@@ -1461,8 +1461,8 @@ function _solve_forward(prob, sensealg, u0, p, originator, args...; merge_callba
         alg = args[1]
         alg, get_concrete_problem(prob, isadaptive(alg); u0 = u0, p = p, kwargs...)
     else # Default algorithm handling
-        alg = !(typeof(prob) <: DiscreteProblem)
-        alg, get_concrete_problem(prob, alg; u0 = u0, p = p,
+        alg = isempty(args) ? nothing : args[1]
+        alg, get_concrete_problem(prob, !(typeof(prob) <: DiscreteProblem); u0 = u0, p = p,
             kwargs...)
     end