From c566d51fa5afcf771de9f4793ca09a7447d7b244 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Robert=20Iv=C3=A1nek?= <robert.ivanek@unibas.ch>
Date: Thu, 28 Sep 2023 11:40:39 +0200
Subject: [PATCH] Fix #84, bumped version

---
 DESCRIPTION | 2 +-
 R/utils.R   | 1 +
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/DESCRIPTION b/DESCRIPTION
index ac40e42..905b97a 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: Gviz
 Title: Plotting data and annotation information along genomic coordinates
-Version: 1.45.1
+Version: 1.45.2
 Authors@R: c(person("Florian", "Hahne", role="aut"),
 	 person("Steffen", "Durinck", role="aut"),
 	 person("Robert", "Ivanek", role=c("aut", "cre"), 
diff --git a/R/utils.R b/R/utils.R
index 2070577..3e67bfc 100644
--- a/R/utils.R
+++ b/R/utils.R
@@ -2186,6 +2186,7 @@ availableDefaultMapping <- function(file, trackType) {
     if (length(range)) {
         alg <- extractAlignmentRangesOnReference(range$cigar, drop.D.ranges = drop.D.ranges)
         rp <- elementNROWS(alg)
+        if (is.null(range$flag)) range$flag <-  as.character(NA)
         range <- sort(GRanges(
             seqnames = rep(seqnames(range), rp), strand = rep("*", sum(rp)), ranges = shift(unlist(alg), rep(start(range), rp) - 1),
             id = rep(range$id, rp), entityId = rep(seq_along(rp), rp), cigar = rep(range$cigar, rp), md = rep(range$md, rp),