Add View All for Next Up. Fixes #1481

components/ItemGrid/GridItem.bs

@@ -112,6 +112,13 @@ sub itemContentChanged()
         else
             m.itemText.text = itemData.Title
         end if
+        ' Adjust to wide posters for "View All Next Up"
+        if m.topParent.overhangTitle = tr("View All Next Up")
+            m.itemPoster.height = 331
+            m.itemPoster.width = 464
+            m.itemText.translation = [0, m.itemPoster.height + 7]
+            m.itemText.maxWidth = 464
+        end if
     else if itemData.type = "MusicArtist"
         m.itemPoster.uri = itemData.PosterUrl
         m.itemText.text = itemData.Title

components/ItemGrid/ItemGrid.bs

@@ -198,6 +198,15 @@ sub loadInitialItems()
             ' non recursive for collections (folders, boxsets, photo albums, etc)
             m.loadItemsTask.recursive = false
         end if
+
+        if getCollectionType() = "nextup"
+            m.loadItemsTask.itemType = "NextUp"
+            m.itemGrid.itemSize = "[464, 331]"
+            m.itemGrid.itemSpacing = "[5, 5]"
+            m.top.imageDisplayMode = "scaleToFit"
+            m.itemGrid.numColumns = 3
+            m.alpha.visible = false
+        end if
     else if m.top.parentItem.json.type = "Studio"
         m.loadItemsTask.itemId = m.top.parentItem.parentFolder
         m.loadItemsTask.itemType = "Series,Movie"
@@ -357,6 +366,12 @@ sub setPhotoAlbumOptions(options)
     options.filter = []
 end sub
 
+sub setupViewAllNextUpOptions(options)
+    options.views = []
+    options.sort = []
+    options.filter = []
+end sub
+
 ' Set Default view, sort, and filter options
 sub setDefaultOptions(options)
     options.views = [
@@ -402,7 +417,8 @@ sub SetUpOptions()
         setPhotoAlbumOptions(options)
     else if getCollectionType() = "music"
         setMusicOptions(options)
-
+    else if getCollectionType() = "nextup"
+        setupViewAllNextUpOptions(options)
     else
         setDefaultOptions(options)
     end if
@@ -836,7 +852,7 @@ function onKeyEvent(key as string, press as boolean) as boolean
             m.top.quickPlayNode = itemToPlay
             return true
         end if
-    else if key = "left" and topGrp.isinFocusChain()
+    else if key = "left" and topGrp.isinFocusChain() and m.alpha.focusable
         m.top.alphaActive = true
         topGrp.setFocus(false)
         m.alphaMenu.setFocus(true)

components/ItemGrid/LoadItemsTask2.bs

@@ -130,6 +130,11 @@ sub loadItems()
         url = Substitute("Users/{0}/Items/", m.global.session.user.id)
         params.append({ ImageTypeLimit: 1 })
         params.append({ EnableImageTypes: "Primary,Backdrop,Banner,Thumb" })
+    else if LCase(m.top.ItemType) = "nextup"
+        url = "Shows/NextUp"
+        params.limit = 100 ' If you have more than 100 in your Next Up queue, maybe go outside a bit more.
+        params.append({ ImageTypeLimit: 1 })
+        params.append({ EnableImageTypes: "Primary,Backdrop,Banner,Thumb" })
     else
         url = Substitute("Users/{0}/Items/", m.global.session.user.id)
     end if
@@ -194,6 +199,12 @@ sub loadItems()
                 tmp.image = PosterImage(item.id, { "maxHeight": 425, "maxWidth": 290, "quality": "90" })
             else if item.type = "Episode"
                 tmp = CreateObject("roSGNode", "TVEpisode")
+                if LCase(m.top.ItemType) = "nextup"
+                    tmp.title = item.name
+                    tmp.json = item
+                    tmp.type = "Episode"
+                    tmp.posterUrl = api.items.GetImageURL(item.id, "primary", 0, { "maxHeight": 331, "maxWidth": 464, "quality": "90" })
+                end if
             else if LCase(item.Type) = "recording"
                 tmp = CreateObject("roSGNode", "RecordingData")
             else if item.Type = "Genre"
@@ -281,7 +292,7 @@ sub loadItems()
             end if
 
             if tmp <> invalid
-                if item.Type <> "Genre" and item.Type <> "MusicGenre"
+                if LCase(item.Type) <> "genre" and LCase(item.Type) <> "musicgenre" and LCase(m.top.ItemType) <> "nextup"
                     tmp.parentFolder = m.top.itemId
                     tmp.json = item
                     if item.UserData <> invalid and item.UserData.isFavorite <> invalid

components/data/HomeData.bs

@@ -19,15 +19,17 @@ sub setData()
 
     ' Set appropriate Images for Wide and Tall based on type
 
-    if datum.type = "CollectionFolder" or datum.type = "UserView"
-        params = { "Tag": datum.ImageTags.Primary, "maxHeight": 261, "maxWidth": 464 }
-        m.top.thumbnailURL = ImageURL(datum.id, "Primary", params)
-        m.top.widePosterUrl = m.top.thumbnailURL
+    if LCase(datum.type) = "collectionfolder" or LCase(datum.type) = "userview"
+        if IsValid(datum.ImageTags)
+            params = { "Tag": datum.ImageTags.Primary, "maxHeight": 261, "maxWidth": 464 }
+            m.top.thumbnailURL = ImageURL(datum.id, "Primary", params)
+            m.top.widePosterUrl = m.top.thumbnailURL
+        end if
 
         ' Add Icon URLs for display if there is no Poster
-        if datum.CollectionType = "livetv"
+        if LCase(datum.CollectionType) = "livetv"
             m.top.iconUrl = "pkg:/images/media_type_icons/live_tv_white.png"
-        else if datum.CollectionType = "folders"
+        else if LCase(datum.CollectionType) = "folders" or LCase(datum.CollectionType) = "nextup"
             m.top.iconUrl = "pkg:/images/media_type_icons/folder_white.png"
         end if
 

components/home/LoadItemsTask.bs

@@ -93,6 +93,17 @@ sub loadItems()
                 tmp.json = item
                 results.push(tmp)
             end for
+            ' Add "View All"
+            tmp = CreateObject("roSGNode", "HomeData")
+            tmp.type = "CollectionFolder"
+            tmp.usePoster = false
+            tmp.json = {
+                IsFolder: true,
+                Name: tr("View All Next Up"),
+                Type: "CollectionFolder",
+                CollectionType: "nextup"
+            }
+            results.push(tmp)
         end if
         ' Load Continue Watching
     else if m.top.itemsToLoad = "continue"

locale/en_US/translations.ts

@@ -1271,5 +1271,10 @@
             <translation>Ratings for how good a movie is</translation>
             <extracomment>User Setting - Setting description</extracomment>
         </message>
+        <message>
+            <source>View All Next Up</source>
+            <translation>View All Next Up</translation>
+            <extracomment>Title for viewing all episodes available in the Next Up section</extracomment>
+        </message>
     </context>
 </TS>