add lisp packages

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/captions.js

@@ -0,0 +1,389 @@
+// ==========================================================================
+// Plyr Captions
+// TODO: Create as class
+// ==========================================================================
+
+import controls from './controls';
+import support from './support';
+import { dedupe } from './utils/arrays';
+import browser from './utils/browser';
+import {
+    createElement,
+    emptyElement,
+    getAttributesFromSelector,
+    insertAfter,
+    removeElement,
+    toggleClass,
+} from './utils/elements';
+import { on, triggerEvent } from './utils/events';
+import fetch from './utils/fetch';
+import i18n from './utils/i18n';
+import is from './utils/is';
+import { getHTML } from './utils/strings';
+import { parseUrl } from './utils/urls';
+
+const captions = {
+    // Setup captions
+    setup() {
+        // Requires UI support
+        if (!this.supported.ui) {
+            return;
+        }
+
+        // Only Vimeo and HTML5 video supported at this point
+        if (!this.isVideo || this.isYouTube || (this.isHTML5 && !support.textTracks)) {
+            // Clear menu and hide
+            if (
+                is.array(this.config.controls) &&
+                this.config.controls.includes('settings') &&
+                this.config.settings.includes('captions')
+            ) {
+                controls.setCaptionsMenu.call(this);
+            }
+
+            return;
+        }
+
+        // Inject the container
+        if (!is.element(this.elements.captions)) {
+            this.elements.captions = createElement('div', getAttributesFromSelector(this.config.selectors.captions));
+
+            insertAfter(this.elements.captions, this.elements.wrapper);
+        }
+
+        // Fix IE captions if CORS is used
+        // Fetch captions and inject as blobs instead (data URIs not supported!)
+        if (browser.isIE && window.URL) {
+            const elements = this.media.querySelectorAll('track');
+
+            Array.from(elements).forEach(track => {
+                const src = track.getAttribute('src');
+                const url = parseUrl(src);
+
+                if (
+                    url !== null &&
+                    url.hostname !== window.location.href.hostname &&
+                    ['http:', 'https:'].includes(url.protocol)
+                ) {
+                    fetch(src, 'blob')
+                        .then(blob => {
+                            track.setAttribute('src', window.URL.createObjectURL(blob));
+                        })
+                        .catch(() => {
+                            removeElement(track);
+                        });
+                }
+            });
+        }
+
+        // Get and set initial data
+        // The "preferred" options are not realized unless / until the wanted language has a match
+        // * languages: Array of user's browser languages.
+        // * language:  The language preferred by user settings or config
+        // * active:    The state preferred by user settings or config
+        // * toggled:   The real captions state
+
+        const browserLanguages = navigator.languages || [navigator.language || navigator.userLanguage || 'en'];
+        const languages = dedupe(browserLanguages.map(language => language.split('-')[0]));
+        let language = (this.storage.get('language') || this.config.captions.language || 'auto').toLowerCase();
+
+        // Use first browser language when language is 'auto'
+        if (language === 'auto') {
+            [language] = languages;
+        }
+
+        let active = this.storage.get('captions');
+        if (!is.boolean(active)) {
+            ({ active } = this.config.captions);
+        }
+
+        Object.assign(this.captions, {
+            toggled: false,
+            active,
+            language,
+            languages,
+        });
+
+        // Watch changes to textTracks and update captions menu
+        if (this.isHTML5) {
+            const trackEvents = this.config.captions.update ? 'addtrack removetrack' : 'removetrack';
+            on.call(this, this.media.textTracks, trackEvents, captions.update.bind(this));
+        }
+
+        // Update available languages in list next tick (the event must not be triggered before the listeners)
+        setTimeout(captions.update.bind(this), 0);
+    },
+
+    // Update available language options in settings based on tracks
+    update() {
+        const tracks = captions.getTracks.call(this, true);
+        // Get the wanted language
+        const { active, language, meta, currentTrackNode } = this.captions;
+        const languageExists = Boolean(tracks.find(track => track.language === language));
+
+        // Handle tracks (add event listener and "pseudo"-default)
+        if (this.isHTML5 && this.isVideo) {
+            tracks
+                .filter(track => !meta.get(track))
+                .forEach(track => {
+                    this.debug.log('Track added', track);
+                    // Attempt to store if the original dom element was "default"
+                    meta.set(track, {
+                        default: track.mode === 'showing',
+                    });
+
+                    // Turn off native caption rendering to avoid double captions
+                    // eslint-disable-next-line no-param-reassign
+                    track.mode = 'hidden';
+
+                    // Add event listener for cue changes
+                    on.call(this, track, 'cuechange', () => captions.updateCues.call(this));
+                });
+        }
+
+        // Update language first time it matches, or if the previous matching track was removed
+        if ((languageExists && this.language !== language) || !tracks.includes(currentTrackNode)) {
+            captions.setLanguage.call(this, language);
+            captions.toggle.call(this, active && languageExists);
+        }
+
+        // Enable or disable captions based on track length
+        toggleClass(this.elements.container, this.config.classNames.captions.enabled, !is.empty(tracks));
+
+        // Update available languages in list
+        if ((this.config.controls || []).includes('settings') && this.config.settings.includes('captions')) {
+            controls.setCaptionsMenu.call(this);
+        }
+    },
+
+    // Toggle captions display
+    // Used internally for the toggleCaptions method, with the passive option forced to false
+    toggle(input, passive = true) {
+        // If there's no full support
+        if (!this.supported.ui) {
+            return;
+        }
+
+        const { toggled } = this.captions; // Current state
+        const activeClass = this.config.classNames.captions.active;
+        // Get the next state
+        // If the method is called without parameter, toggle based on current value
+        const active = is.nullOrUndefined(input) ? !toggled : input;
+
+        // Update state and trigger event
+        if (active !== toggled) {
+            // When passive, don't override user preferences
+            if (!passive) {
+                this.captions.active = active;
+                this.storage.set({ captions: active });
+            }
+
+            // Force language if the call isn't passive and there is no matching language to toggle to
+            if (!this.language && active && !passive) {
+                const tracks = captions.getTracks.call(this);
+                const track = captions.findTrack.call(this, [this.captions.language, ...this.captions.languages], true);
+
+                // Override user preferences to avoid switching languages if a matching track is added
+                this.captions.language = track.language;
+
+                // Set caption, but don't store in localStorage as user preference
+                captions.set.call(this, tracks.indexOf(track));
+                return;
+            }
+
+            // Toggle button if it's enabled
+            if (this.elements.buttons.captions) {
+                this.elements.buttons.captions.pressed = active;
+            }
+
+            // Add class hook
+            toggleClass(this.elements.container, activeClass, active);
+
+            this.captions.toggled = active;
+
+            // Update settings menu
+            controls.updateSetting.call(this, 'captions');
+
+            // Trigger event (not used internally)
+            triggerEvent.call(this, this.media, active ? 'captionsenabled' : 'captionsdisabled');
+        }
+    },
+
+    // Set captions by track index
+    // Used internally for the currentTrack setter with the passive option forced to false
+    set(index, passive = true) {
+        const tracks = captions.getTracks.call(this);
+
+        // Disable captions if setting to -1
+        if (index === -1) {
+            captions.toggle.call(this, false, passive);
+            return;
+        }
+
+        if (!is.number(index)) {
+            this.debug.warn('Invalid caption argument', index);
+            return;
+        }
+
+        if (!(index in tracks)) {
+            this.debug.warn('Track not found', index);
+            return;
+        }
+
+        if (this.captions.currentTrack !== index) {
+            this.captions.currentTrack = index;
+            const track = tracks[index];
+            const { language } = track || {};
+
+            // Store reference to node for invalidation on remove
+            this.captions.currentTrackNode = track;
+
+            // Update settings menu
+            controls.updateSetting.call(this, 'captions');
+
+            // When passive, don't override user preferences
+            if (!passive) {
+                this.captions.language = language;
+                this.storage.set({ language });
+            }
+
+            // Handle Vimeo captions
+            if (this.isVimeo) {
+                this.embed.enableTextTrack(language);
+            }
+
+            // Trigger event
+            triggerEvent.call(this, this.media, 'languagechange');
+        }
+
+        // Show captions
+        captions.toggle.call(this, true, passive);
+
+        if (this.isHTML5 && this.isVideo) {
+            // If we change the active track while a cue is already displayed we need to update it
+            captions.updateCues.call(this);
+        }
+    },
+
+    // Set captions by language
+    // Used internally for the language setter with the passive option forced to false
+    setLanguage(input, passive = true) {
+        if (!is.string(input)) {
+            this.debug.warn('Invalid language argument', input);
+            return;
+        }
+        // Normalize
+        const language = input.toLowerCase();
+        this.captions.language = language;
+
+        // Set currentTrack
+        const tracks = captions.getTracks.call(this);
+        const track = captions.findTrack.call(this, [language]);
+        captions.set.call(this, tracks.indexOf(track), passive);
+    },
+
+    // Get current valid caption tracks
+    // If update is false it will also ignore tracks without metadata
+    // This is used to "freeze" the language options when captions.update is false
+    getTracks(update = false) {
+        // Handle media or textTracks missing or null
+        const tracks = Array.from((this.media || {}).textTracks || []);
+        // For HTML5, use cache instead of current tracks when it exists (if captions.update is false)
+        // Filter out removed tracks and tracks that aren't captions/subtitles (for example metadata)
+        return tracks
+            .filter(track => !this.isHTML5 || update || this.captions.meta.has(track))
+            .filter(track => ['captions', 'subtitles'].includes(track.kind));
+    },
+
+    // Match tracks based on languages and get the first
+    findTrack(languages, force = false) {
+        const tracks = captions.getTracks.call(this);
+        const sortIsDefault = track => Number((this.captions.meta.get(track) || {}).default);
+        const sorted = Array.from(tracks).sort((a, b) => sortIsDefault(b) - sortIsDefault(a));
+        let track;
+
+        languages.every(language => {
+            track = sorted.find(t => t.language === language);
+            return !track; // Break iteration if there is a match
+        });
+
+        // If no match is found but is required, get first
+        return track || (force ? sorted[0] : undefined);
+    },
+
+    // Get the current track
+    getCurrentTrack() {
+        return captions.getTracks.call(this)[this.currentTrack];
+    },
+
+    // Get UI label for track
+    getLabel(track) {
+        let currentTrack = track;
+
+        if (!is.track(currentTrack) && support.textTracks && this.captions.toggled) {
+            currentTrack = captions.getCurrentTrack.call(this);
+        }
+
+        if (is.track(currentTrack)) {
+            if (!is.empty(currentTrack.label)) {
+                return currentTrack.label;
+            }
+
+            if (!is.empty(currentTrack.language)) {
+                return track.language.toUpperCase();
+            }
+
+            return i18n.get('enabled', this.config);
+        }
+
+        return i18n.get('disabled', this.config);
+    },
+
+    // Update captions using current track's active cues
+    // Also optional array argument in case there isn't any track (ex: vimeo)
+    updateCues(input) {
+        // Requires UI
+        if (!this.supported.ui) {
+            return;
+        }
+
+        if (!is.element(this.elements.captions)) {
+            this.debug.warn('No captions element to render to');
+            return;
+        }
+
+        // Only accept array or empty input
+        if (!is.nullOrUndefined(input) && !Array.isArray(input)) {
+            this.debug.warn('updateCues: Invalid input', input);
+            return;
+        }
+
+        let cues = input;
+
+        // Get cues from track
+        if (!cues) {
+            const track = captions.getCurrentTrack.call(this);
+
+            cues = Array.from((track || {}).activeCues || [])
+                .map(cue => cue.getCueAsHTML())
+                .map(getHTML);
+        }
+
+        // Set new caption text
+        const content = cues.map(cueText => cueText.trim()).join('\n');
+        const changed = content !== this.elements.captions.innerHTML;
+
+        if (changed) {
+            // Empty the container and create a new child element
+            emptyElement(this.elements.captions);
+            const caption = createElement('span', getAttributesFromSelector(this.config.selectors.caption));
+            caption.innerHTML = content;
+            this.elements.captions.appendChild(caption);
+
+            // Trigger event
+            triggerEvent.call(this, this.media, 'cuechange');
+        }
+    },
+};
+
+export default captions;

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/config/defaults.js

@@ -0,0 +1,439 @@
+// ==========================================================================
+// Plyr default config
+// ==========================================================================
+
+const defaults = {
+    // Disable
+    enabled: true,
+
+    // Custom media title
+    title: '',
+
+    // Logging to console
+    debug: false,
+
+    // Auto play (if supported)
+    autoplay: false,
+
+    // Only allow one media playing at once (vimeo only)
+    autopause: true,
+
+    // Allow inline playback on iOS (this effects YouTube/Vimeo - HTML5 requires the attribute present)
+    // TODO: Remove iosNative fullscreen option in favour of this (logic needs work)
+    playsinline: true,
+
+    // Default time to skip when rewind/fast forward
+    seekTime: 10,
+
+    // Default volume
+    volume: 1,
+    muted: false,
+
+    // Pass a custom duration
+    duration: null,
+
+    // Display the media duration on load in the current time position
+    // If you have opted to display both duration and currentTime, this is ignored
+    displayDuration: true,
+
+    // Invert the current time to be a countdown
+    invertTime: true,
+
+    // Clicking the currentTime inverts it's value to show time left rather than elapsed
+    toggleInvert: true,
+
+    // Force an aspect ratio
+    // The format must be `'w:h'` (e.g. `'16:9'`)
+    ratio: null,
+
+    // Click video container to play/pause
+    clickToPlay: true,
+
+    // Auto hide the controls
+    hideControls: true,
+
+    // Reset to start when playback ended
+    resetOnEnd: false,
+
+    // Disable the standard context menu
+    disableContextMenu: true,
+
+    // Sprite (for icons)
+    loadSprite: true,
+    iconPrefix: 'plyr',
+    iconUrl: 'https://cdn.plyr.io/3.5.10/plyr.svg',
+
+    // Blank video (used to prevent errors on source change)
+    blankVideo: 'https://cdn.plyr.io/static/blank.mp4',
+
+    // Quality default
+    quality: {
+        default: 576,
+        // The options to display in the UI, if available for the source media
+        options: [4320, 2880, 2160, 1440, 1080, 720, 576, 480, 360, 240],
+        forced: false,
+        onChange: null,
+    },
+
+    // Set loops
+    loop: {
+        active: false,
+        // start: null,
+        // end: null,
+    },
+
+    // Speed default and options to display
+    speed: {
+        selected: 1,
+        // The options to display in the UI, if available for the source media (e.g. Vimeo and YouTube only support 0.5x-4x)
+        options: [0.5, 0.75, 1, 1.25, 1.5, 1.75, 2, 4],
+    },
+
+    // Keyboard shortcut settings
+    keyboard: {
+        focused: true,
+        global: false,
+    },
+
+    // Display tooltips
+    tooltips: {
+        controls: false,
+        seek: true,
+    },
+
+    // Captions settings
+    captions: {
+        active: false,
+        language: 'auto',
+        // Listen to new tracks added after Plyr is initialized.
+        // This is needed for streaming captions, but may result in unselectable options
+        update: false,
+    },
+
+    // Fullscreen settings
+    fullscreen: {
+        enabled: true, // Allow fullscreen?
+        fallback: true, // Fallback using full viewport/window
+        iosNative: false, // Use the native fullscreen in iOS (disables custom controls)
+    },
+
+    // Local storage
+    storage: {
+        enabled: true,
+        key: 'plyr',
+    },
+
+    // Default controls
+    controls: [
+        'play-large',
+        // 'restart',
+        // 'rewind',
+        'play',
+        // 'fast-forward',
+        'progress',
+        'current-time',
+        // 'duration',
+        'mute',
+        'volume',
+        'captions',
+        'settings',
+        'pip',
+        'airplay',
+        // 'download',
+        'fullscreen',
+    ],
+    settings: ['captions', 'quality', 'speed'],
+
+    // Localisation
+    i18n: {
+        restart: 'Restart',
+        rewind: 'Rewind {seektime}s',
+        play: 'Play',
+        pause: 'Pause',
+        fastForward: 'Forward {seektime}s',
+        seek: 'Seek',
+        seekLabel: '{currentTime} of {duration}',
+        played: 'Played',
+        buffered: 'Buffered',
+        currentTime: 'Current time',
+        duration: 'Duration',
+        volume: 'Volume',
+        mute: 'Mute',
+        unmute: 'Unmute',
+        enableCaptions: 'Enable captions',
+        disableCaptions: 'Disable captions',
+        download: 'Download',
+        enterFullscreen: 'Enter fullscreen',
+        exitFullscreen: 'Exit fullscreen',
+        frameTitle: 'Player for {title}',
+        captions: 'Captions',
+        settings: 'Settings',
+        pip: 'PIP',
+        menuBack: 'Go back to previous menu',
+        speed: 'Speed',
+        normal: 'Normal',
+        quality: 'Quality',
+        loop: 'Loop',
+        start: 'Start',
+        end: 'End',
+        all: 'All',
+        reset: 'Reset',
+        disabled: 'Disabled',
+        enabled: 'Enabled',
+        advertisement: 'Ad',
+        qualityBadge: {
+            2160: '4K',
+            1440: 'HD',
+            1080: 'HD',
+            720: 'HD',
+            576: 'SD',
+            480: 'SD',
+        },
+    },
+
+    // URLs
+    urls: {
+        download: null,
+        vimeo: {
+            sdk: 'https://player.vimeo.com/api/player.js',
+            iframe: 'https://player.vimeo.com/video/{0}?{1}',
+            api: 'https://vimeo.com/api/v2/video/{0}.json',
+        },
+        youtube: {
+            sdk: 'https://www.youtube.com/iframe_api',
+            api: 'https://noembed.com/embed?url=https://www.youtube.com/watch?v={0}',
+        },
+        googleIMA: {
+            sdk: 'https://imasdk.googleapis.com/js/sdkloader/ima3.js',
+        },
+    },
+
+    // Custom control listeners
+    listeners: {
+        seek: null,
+        play: null,
+        pause: null,
+        restart: null,
+        rewind: null,
+        fastForward: null,
+        mute: null,
+        volume: null,
+        captions: null,
+        download: null,
+        fullscreen: null,
+        pip: null,
+        airplay: null,
+        speed: null,
+        quality: null,
+        loop: null,
+        language: null,
+    },
+
+    // Events to watch and bubble
+    events: [
+        // Events to watch on HTML5 media elements and bubble
+        // https://developer.mozilla.org/en/docs/Web/Guide/Events/Media_events
+        'ended',
+        'progress',
+        'stalled',
+        'playing',
+        'waiting',
+        'canplay',
+        'canplaythrough',
+        'loadstart',
+        'loadeddata',
+        'loadedmetadata',
+        'timeupdate',
+        'volumechange',
+        'play',
+        'pause',
+        'error',
+        'seeking',
+        'seeked',
+        'emptied',
+        'ratechange',
+        'cuechange',
+
+        // Custom events
+        'download',
+        'enterfullscreen',
+        'exitfullscreen',
+        'captionsenabled',
+        'captionsdisabled',
+        'languagechange',
+        'controlshidden',
+        'controlsshown',
+        'ready',
+
+        // YouTube
+        'statechange',
+
+        // Quality
+        'qualitychange',
+
+        // Ads
+        'adsloaded',
+        'adscontentpause',
+        'adscontentresume',
+        'adstarted',
+        'adsmidpoint',
+        'adscomplete',
+        'adsallcomplete',
+        'adsimpression',
+        'adsclick',
+    ],
+
+    // Selectors
+    // Change these to match your template if using custom HTML
+    selectors: {
+        editable: 'input, textarea, select, [contenteditable]',
+        container: '.plyr',
+        controls: {
+            container: null,
+            wrapper: '.plyr__controls',
+        },
+        labels: '[data-plyr]',
+        buttons: {
+            play: '[data-plyr="play"]',
+            pause: '[data-plyr="pause"]',
+            restart: '[data-plyr="restart"]',
+            rewind: '[data-plyr="rewind"]',
+            fastForward: '[data-plyr="fast-forward"]',
+            mute: '[data-plyr="mute"]',
+            captions: '[data-plyr="captions"]',
+            download: '[data-plyr="download"]',
+            fullscreen: '[data-plyr="fullscreen"]',
+            pip: '[data-plyr="pip"]',
+            airplay: '[data-plyr="airplay"]',
+            settings: '[data-plyr="settings"]',
+            loop: '[data-plyr="loop"]',
+        },
+        inputs: {
+            seek: '[data-plyr="seek"]',
+            volume: '[data-plyr="volume"]',
+            speed: '[data-plyr="speed"]',
+            language: '[data-plyr="language"]',
+            quality: '[data-plyr="quality"]',
+        },
+        display: {
+            currentTime: '.plyr__time--current',
+            duration: '.plyr__time--duration',
+            buffer: '.plyr__progress__buffer',
+            loop: '.plyr__progress__loop', // Used later
+            volume: '.plyr__volume--display',
+        },
+        progress: '.plyr__progress',
+        captions: '.plyr__captions',
+        caption: '.plyr__caption',
+    },
+
+    // Class hooks added to the player in different states
+    classNames: {
+        type: 'plyr--{0}',
+        provider: 'plyr--{0}',
+        video: 'plyr__video-wrapper',
+        embed: 'plyr__video-embed',
+        videoFixedRatio: 'plyr__video-wrapper--fixed-ratio',
+        embedContainer: 'plyr__video-embed__container',
+        poster: 'plyr__poster',
+        posterEnabled: 'plyr__poster-enabled',
+        ads: 'plyr__ads',
+        control: 'plyr__control',
+        controlPressed: 'plyr__control--pressed',
+        playing: 'plyr--playing',
+        paused: 'plyr--paused',
+        stopped: 'plyr--stopped',
+        loading: 'plyr--loading',
+        hover: 'plyr--hover',
+        tooltip: 'plyr__tooltip',
+        cues: 'plyr__cues',
+        hidden: 'plyr__sr-only',
+        hideControls: 'plyr--hide-controls',
+        isIos: 'plyr--is-ios',
+        isTouch: 'plyr--is-touch',
+        uiSupported: 'plyr--full-ui',
+        noTransition: 'plyr--no-transition',
+        display: {
+            time: 'plyr__time',
+        },
+        menu: {
+            value: 'plyr__menu__value',
+            badge: 'plyr__badge',
+            open: 'plyr--menu-open',
+        },
+        captions: {
+            enabled: 'plyr--captions-enabled',
+            active: 'plyr--captions-active',
+        },
+        fullscreen: {
+            enabled: 'plyr--fullscreen-enabled',
+            fallback: 'plyr--fullscreen-fallback',
+        },
+        pip: {
+            supported: 'plyr--pip-supported',
+            active: 'plyr--pip-active',
+        },
+        airplay: {
+            supported: 'plyr--airplay-supported',
+            active: 'plyr--airplay-active',
+        },
+        tabFocus: 'plyr__tab-focus',
+        previewThumbnails: {
+            // Tooltip thumbs
+            thumbContainer: 'plyr__preview-thumb',
+            thumbContainerShown: 'plyr__preview-thumb--is-shown',
+            imageContainer: 'plyr__preview-thumb__image-container',
+            timeContainer: 'plyr__preview-thumb__time-container',
+            // Scrubbing
+            scrubbingContainer: 'plyr__preview-scrubbing',
+            scrubbingContainerShown: 'plyr__preview-scrubbing--is-shown',
+        },
+    },
+
+    // Embed attributes
+    attributes: {
+        embed: {
+            provider: 'data-plyr-provider',
+            id: 'data-plyr-embed-id',
+        },
+    },
+
+    // Advertisements plugin
+    // Register for an account here: http://vi.ai/publisher-video-monetization/?aid=plyrio
+    ads: {
+        enabled: false,
+        publisherId: '',
+        tagUrl: '',
+    },
+
+    // Preview Thumbnails plugin
+    previewThumbnails: {
+        enabled: false,
+        src: '',
+    },
+
+    // Vimeo plugin
+    vimeo: {
+        byline: false,
+        portrait: false,
+        title: false,
+        speed: true,
+        transparent: false,
+        // These settings require a pro or premium account to work
+        sidedock: false,
+        controls: false,
+        // Custom settings from Plyr
+        referrerPolicy: null, // https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement/referrerPolicy
+    },
+
+    // YouTube plugin
+    youtube: {
+        noCookie: false, // Whether to use an alternative version of YouTube without cookies
+        rel: 0, // No related vids
+        showinfo: 0, // Hide info
+        iv_load_policy: 3, // Hide annotations
+        modestbranding: 1, // Hide logos as much as possible (they still show one in the corner when paused)
+    },
+};
+
+export default defaults;

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/config/states.js

@@ -0,0 +1,10 @@
+// ==========================================================================
+// Plyr states
+// ==========================================================================
+
+export const pip = {
+    active: 'picture-in-picture',
+    inactive: 'inline',
+};
+
+export default { pip };

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/config/types.js

@@ -0,0 +1,34 @@
+// ==========================================================================
+// Plyr supported types and providers
+// ==========================================================================
+
+export const providers = {
+    html5: 'html5',
+    youtube: 'youtube',
+    vimeo: 'vimeo',
+};
+
+export const types = {
+    audio: 'audio',
+    video: 'video',
+};
+
+/**
+ * Get provider by URL
+ * @param {String} url
+ */
+export function getProviderByUrl(url) {
+    // YouTube
+    if (/^(https?:\/\/)?(www\.)?(youtube\.com|youtube-nocookie\.com|youtu\.?be)\/.+$/.test(url)) {
+        return providers.youtube;
+    }
+
+    // Vimeo
+    if (/^https?:\/\/player.vimeo.com\/video\/\d{0,9}(?=\b|\/)/.test(url)) {
+        return providers.vimeo;
+    }
+
+    return null;
+}
+
+export default { providers, types };

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/console.js

@@ -0,0 +1,30 @@
+// ==========================================================================
+// Console wrapper
+// ==========================================================================
+
+const noop = () => {};
+
+export default class Console {
+    constructor(enabled = false) {
+        this.enabled = window.console && enabled;
+
+        if (this.enabled) {
+            this.log('Debugging enabled');
+        }
+    }
+
+    get log() {
+        // eslint-disable-next-line no-console
+        return this.enabled ? Function.prototype.bind.call(console.log, console) : noop;
+    }
+
+    get warn() {
+        // eslint-disable-next-line no-console
+        return this.enabled ? Function.prototype.bind.call(console.warn, console) : noop;
+    }
+
+    get error() {
+        // eslint-disable-next-line no-console
+        return this.enabled ? Function.prototype.bind.call(console.error, console) : noop;
+    }
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/fullscreen.js

@@ -0,0 +1,292 @@
+// ==========================================================================
+// Fullscreen wrapper
+// https://developer.mozilla.org/en-US/docs/Web/API/Fullscreen_API#prefixing
+// https://webkit.org/blog/7929/designing-websites-for-iphone-x/
+// ==========================================================================
+
+import browser from './utils/browser';
+import { getElements, hasClass, toggleClass } from './utils/elements';
+import { on, triggerEvent } from './utils/events';
+import is from './utils/is';
+
+class Fullscreen {
+    constructor(player) {
+        // Keep reference to parent
+        this.player = player;
+
+        // Get prefix
+        this.prefix = Fullscreen.prefix;
+        this.property = Fullscreen.property;
+
+        // Scroll position
+        this.scrollPosition = { x: 0, y: 0 };
+
+        // Force the use of 'full window/browser' rather than fullscreen
+        this.forceFallback = player.config.fullscreen.fallback === 'force';
+
+        // Register event listeners
+        // Handle event (incase user presses escape etc)
+        on.call(
+            this.player,
+            document,
+            this.prefix === 'ms' ? 'MSFullscreenChange' : `${this.prefix}fullscreenchange`,
+            () => {
+                // TODO: Filter for target??
+                this.onChange();
+            },
+        );
+
+        // Fullscreen toggle on double click
+        on.call(this.player, this.player.elements.container, 'dblclick', event => {
+            // Ignore double click in controls
+            if (is.element(this.player.elements.controls) && this.player.elements.controls.contains(event.target)) {
+                return;
+            }
+
+            this.toggle();
+        });
+
+        // Tap focus when in fullscreen
+        on.call(this, this.player.elements.container, 'keydown', event => this.trapFocus(event));
+
+        // Update the UI
+        this.update();
+    }
+
+    // Determine if native supported
+    static get native() {
+        return !!(
+            document.fullscreenEnabled ||
+            document.webkitFullscreenEnabled ||
+            document.mozFullScreenEnabled ||
+            document.msFullscreenEnabled
+        );
+    }
+
+    // If we're actually using native
+    get usingNative() {
+        return Fullscreen.native && !this.forceFallback;
+    }
+
+    // Get the prefix for handlers
+    static get prefix() {
+        // No prefix
+        if (is.function(document.exitFullscreen)) {
+            return '';
+        }
+
+        // Check for fullscreen support by vendor prefix
+        let value = '';
+        const prefixes = ['webkit', 'moz', 'ms'];
+
+        prefixes.some(pre => {
+            if (is.function(document[`${pre}ExitFullscreen`]) || is.function(document[`${pre}CancelFullScreen`])) {
+                value = pre;
+                return true;
+            }
+
+            return false;
+        });
+
+        return value;
+    }
+
+    static get property() {
+        return this.prefix === 'moz' ? 'FullScreen' : 'Fullscreen';
+    }
+
+    // Determine if fullscreen is enabled
+    get enabled() {
+        return (
+            (Fullscreen.native || this.player.config.fullscreen.fallback) &&
+            this.player.config.fullscreen.enabled &&
+            this.player.supported.ui &&
+            this.player.isVideo
+        );
+    }
+
+    // Get active state
+    get active() {
+        if (!this.enabled) {
+            return false;
+        }
+
+        // Fallback using classname
+        if (!Fullscreen.native || this.forceFallback) {
+            return hasClass(this.target, this.player.config.classNames.fullscreen.fallback);
+        }
+
+        const element = !this.prefix ? document.fullscreenElement : document[`${this.prefix}${this.property}Element`];
+
+        return element === this.target;
+    }
+
+    // Get target element
+    get target() {
+        return browser.isIos && this.player.config.fullscreen.iosNative
+            ? this.player.media
+            : this.player.elements.container;
+    }
+
+    onChange() {
+        if (!this.enabled) {
+            return;
+        }
+
+        // Update toggle button
+        const button = this.player.elements.buttons.fullscreen;
+        if (is.element(button)) {
+            button.pressed = this.active;
+        }
+
+        // Trigger an event
+        triggerEvent.call(this.player, this.target, this.active ? 'enterfullscreen' : 'exitfullscreen', true);
+    }
+
+    toggleFallback(toggle = false) {
+        // Store or restore scroll position
+        if (toggle) {
+            this.scrollPosition = {
+                x: window.scrollX || 0,
+                y: window.scrollY || 0,
+            };
+        } else {
+            window.scrollTo(this.scrollPosition.x, this.scrollPosition.y);
+        }
+
+        // Toggle scroll
+        document.body.style.overflow = toggle ? 'hidden' : '';
+
+        // Toggle class hook
+        toggleClass(this.target, this.player.config.classNames.fullscreen.fallback, toggle);
+
+        // Force full viewport on iPhone X+
+        if (browser.isIos) {
+            let viewport = document.head.querySelector('meta[name="viewport"]');
+            const property = 'viewport-fit=cover';
+
+            // Inject the viewport meta if required
+            if (!viewport) {
+                viewport = document.createElement('meta');
+                viewport.setAttribute('name', 'viewport');
+            }
+
+            // Check if the property already exists
+            const hasProperty = is.string(viewport.content) && viewport.content.includes(property);
+
+            if (toggle) {
+                this.cleanupViewport = !hasProperty;
+
+                if (!hasProperty) {
+                    viewport.content += `,${property}`;
+                }
+            } else if (this.cleanupViewport) {
+                viewport.content = viewport.content
+                    .split(',')
+                    .filter(part => part.trim() !== property)
+                    .join(',');
+            }
+        }
+
+        // Toggle button and fire events
+        this.onChange();
+    }
+
+    // Trap focus inside container
+    trapFocus(event) {
+        // Bail if iOS, not active, not the tab key
+        if (browser.isIos || !this.active || event.key !== 'Tab' || event.keyCode !== 9) {
+            return;
+        }
+
+        // Get the current focused element
+        const focused = document.activeElement;
+        const focusable = getElements.call(
+            this.player,
+            'a[href], button:not(:disabled), input:not(:disabled), [tabindex]',
+        );
+        const [first] = focusable;
+        const last = focusable[focusable.length - 1];
+
+        if (focused === last && !event.shiftKey) {
+            // Move focus to first element that can be tabbed if Shift isn't used
+            first.focus();
+            event.preventDefault();
+        } else if (focused === first && event.shiftKey) {
+            // Move focus to last element that can be tabbed if Shift is used
+            last.focus();
+            event.preventDefault();
+        }
+    }
+
+    // Update UI
+    update() {
+        if (this.enabled) {
+            let mode;
+
+            if (this.forceFallback) {
+                mode = 'Fallback (forced)';
+            } else if (Fullscreen.native) {
+                mode = 'Native';
+            } else {
+                mode = 'Fallback';
+            }
+
+            this.player.debug.log(`${mode} fullscreen enabled`);
+        } else {
+            this.player.debug.log('Fullscreen not supported and fallback disabled');
+        }
+
+        // Add styling hook to show button
+        toggleClass(this.player.elements.container, this.player.config.classNames.fullscreen.enabled, this.enabled);
+    }
+
+    // Make an element fullscreen
+    enter() {
+        if (!this.enabled) {
+            return;
+        }
+
+        // iOS native fullscreen doesn't need the request step
+        if (browser.isIos && this.player.config.fullscreen.iosNative) {
+            this.target.webkitEnterFullscreen();
+        } else if (!Fullscreen.native || this.forceFallback) {
+            this.toggleFallback(true);
+        } else if (!this.prefix) {
+            this.target.requestFullscreen({ navigationUI: 'hide' });
+        } else if (!is.empty(this.prefix)) {
+            this.target[`${this.prefix}Request${this.property}`]();
+        }
+    }
+
+    // Bail from fullscreen
+    exit() {
+        if (!this.enabled) {
+            return;
+        }
+
+        // iOS native fullscreen
+        if (browser.isIos && this.player.config.fullscreen.iosNative) {
+            this.target.webkitExitFullscreen();
+            this.player.play();
+        } else if (!Fullscreen.native || this.forceFallback) {
+            this.toggleFallback(false);
+        } else if (!this.prefix) {
+            (document.cancelFullScreen || document.exitFullscreen).call(document);
+        } else if (!is.empty(this.prefix)) {
+            const action = this.prefix === 'moz' ? 'Cancel' : 'Exit';
+            document[`${this.prefix}${action}${this.property}`]();
+        }
+    }
+
+    // Toggle state
+    toggle() {
+        if (!this.active) {
+            this.enter();
+        } else {
+            this.exit();
+        }
+    }
+}
+
+export default Fullscreen;

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/html5.js

@@ -0,0 +1,146 @@
+// ==========================================================================
+// Plyr HTML5 helpers
+// ==========================================================================
+
+import support from './support';
+import { removeElement } from './utils/elements';
+import { triggerEvent } from './utils/events';
+import is from './utils/is';
+import { setAspectRatio } from './utils/style';
+
+const html5 = {
+    getSources() {
+        if (!this.isHTML5) {
+            return [];
+        }
+
+        const sources = Array.from(this.media.querySelectorAll('source'));
+
+        // Filter out unsupported sources (if type is specified)
+        return sources.filter(source => {
+            const type = source.getAttribute('type');
+
+            if (is.empty(type)) {
+                return true;
+            }
+
+            return support.mime.call(this, type);
+        });
+    },
+
+    // Get quality levels
+    getQualityOptions() {
+        // Whether we're forcing all options (e.g. for streaming)
+        if (this.config.quality.forced) {
+            return this.config.quality.options;
+        }
+
+        // Get sizes from <source> elements
+        return html5.getSources
+            .call(this)
+            .map(source => Number(source.getAttribute('size')))
+            .filter(Boolean);
+    },
+
+    setup() {
+        if (!this.isHTML5) {
+            return;
+        }
+
+        const player = this;
+
+        // Set speed options from config
+        player.options.speed = player.config.speed.options;
+
+        // Set aspect ratio if fixed
+        if (!is.empty(this.config.ratio)) {
+            setAspectRatio.call(player);
+        }
+
+        // Quality
+        Object.defineProperty(player.media, 'quality', {
+            get() {
+                // Get sources
+                const sources = html5.getSources.call(player);
+                const source = sources.find(s => s.getAttribute('src') === player.source);
+
+                // Return size, if match is found
+                return source && Number(source.getAttribute('size'));
+            },
+            set(input) {
+                if (player.quality === input) {
+                    return;
+                }
+
+                // If we're using an an external handler...
+                if (player.config.quality.forced && is.function(player.config.quality.onChange)) {
+                    player.config.quality.onChange(input);
+                } else {
+                    // Get sources
+                    const sources = html5.getSources.call(player);
+                    // Get first match for requested size
+                    const source = sources.find(s => Number(s.getAttribute('size')) === input);
+
+                    // No matching source found
+                    if (!source) {
+                        return;
+                    }
+
+                    // Get current state
+                    const { currentTime, paused, preload, readyState, playbackRate } = player.media;
+
+                    // Set new source
+                    player.media.src = source.getAttribute('src');
+
+                    // Prevent loading if preload="none" and the current source isn't loaded (#1044)
+                    if (preload !== 'none' || readyState) {
+                        // Restore time
+                        player.once('loadedmetadata', () => {
+                            player.speed = playbackRate;
+                            player.currentTime = currentTime;
+
+                            // Resume playing
+                            if (!paused) {
+                                player.play();
+                            }
+                        });
+
+                        // Load new source
+                        player.media.load();
+                    }
+                }
+
+                // Trigger change event
+                triggerEvent.call(player, player.media, 'qualitychange', false, {
+                    quality: input,
+                });
+            },
+        });
+    },
+
+    // Cancel current network requests
+    // See https://github.com/sampotts/plyr/issues/174
+    cancelRequests() {
+        if (!this.isHTML5) {
+            return;
+        }
+
+        // Remove child sources
+        removeElement(html5.getSources.call(this));
+
+        // Set blank video src attribute
+        // This is to prevent a MEDIA_ERR_SRC_NOT_SUPPORTED error
+        // Info: http://stackoverflow.com/questions/32231579/how-to-properly-dispose-of-an-html5-video-and-close-socket-or-connection
+        this.media.setAttribute('src', this.config.blankVideo);
+
+        // Load the new empty source
+        // This will cancel existing requests
+        // See https://github.com/sampotts/plyr/issues/174
+        this.media.load();
+
+        // Debugging
+        this.debug.log('Cancelled network requests');
+    },
+};
+
+export default html5;

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/listeners.js

@@ -0,0 +1,855 @@
+// ==========================================================================
+// Plyr Event Listeners
+// ==========================================================================
+
+import controls from './controls';
+import ui from './ui';
+import { repaint } from './utils/animation';
+import browser from './utils/browser';
+import { getElement, getElements, matches, toggleClass } from './utils/elements';
+import { off, on, once, toggleListener, triggerEvent } from './utils/events';
+import is from './utils/is';
+import { getAspectRatio, setAspectRatio } from './utils/style';
+
+class Listeners {
+    constructor(player) {
+        this.player = player;
+        this.lastKey = null;
+        this.focusTimer = null;
+        this.lastKeyDown = null;
+
+        this.handleKey = this.handleKey.bind(this);
+        this.toggleMenu = this.toggleMenu.bind(this);
+        this.setTabFocus = this.setTabFocus.bind(this);
+        this.firstTouch = this.firstTouch.bind(this);
+    }
+
+    // Handle key presses
+    handleKey(event) {
+        const { player } = this;
+        const { elements } = player;
+        const code = event.keyCode ? event.keyCode : event.which;
+        const pressed = event.type === 'keydown';
+        const repeat = pressed && code === this.lastKey;
+
+        // Bail if a modifier key is set
+        if (event.altKey || event.ctrlKey || event.metaKey || event.shiftKey) {
+            return;
+        }
+
+        // If the event is bubbled from the media element
+        // Firefox doesn't get the keycode for whatever reason
+        if (!is.number(code)) {
+            return;
+        }
+
+        // Seek by the number keys
+        const seekByKey = () => {
+            // Divide the max duration into 10th's and times by the number value
+            player.currentTime = (player.duration / 10) * (code - 48);
+        };
+
+        // Handle the key on keydown
+        // Reset on keyup
+        if (pressed) {
+            // Check focused element
+            // and if the focused element is not editable (e.g. text input)
+            // and any that accept key input http://webaim.org/techniques/keyboard/
+            const focused = document.activeElement;
+            if (is.element(focused)) {
+                const { editable } = player.config.selectors;
+                const { seek } = elements.inputs;
+
+                if (focused !== seek && matches(focused, editable)) {
+                    return;
+                }
+
+                if (event.which === 32 && matches(focused, 'button, [role^="menuitem"]')) {
+                    return;
+                }
+            }
+
+            // Which keycodes should we prevent default
+            const preventDefault = [32, 37, 38, 39, 40, 48, 49, 50, 51, 52, 53, 54, 56, 57, 67, 70, 73, 75, 76, 77, 79];
+
+            // If the code is found prevent default (e.g. prevent scrolling for arrows)
+            if (preventDefault.includes(code)) {
+                event.preventDefault();
+                event.stopPropagation();
+            }
+
+            switch (code) {
+                case 48:
+                case 49:
+                case 50:
+                case 51:
+                case 52:
+                case 53:
+                case 54:
+                case 55:
+                case 56:
+                case 57:
+                    // 0-9
+                    if (!repeat) {
+                        seekByKey();
+                    }
+                    break;
+
+                case 32:
+                case 75:
+                    // Space and K key
+                    if (!repeat) {
+                        player.togglePlay();
+                    }
+                    break;
+
+                case 38:
+                    // Arrow up
+                    player.increaseVolume(0.1);
+                    break;
+
+                case 40:
+                    // Arrow down
+                    player.decreaseVolume(0.1);
+                    break;
+
+                case 77:
+                    // M key
+                    if (!repeat) {
+                        player.muted = !player.muted;
+                    }
+                    break;
+
+                case 39:
+                    // Arrow forward
+                    player.forward();
+                    break;
+
+                case 37:
+                    // Arrow back
+                    player.rewind();
+                    break;
+
+                case 70:
+                    // F key
+                    player.fullscreen.toggle();
+                    break;
+
+                case 67:
+                    // C key
+                    if (!repeat) {
+                        player.toggleCaptions();
+                    }
+                    break;
+
+                case 76:
+                    // L key
+                    player.loop = !player.loop;
+                    break;
+
+                /* case 73:
+                    this.setLoop('start');
+                    break;
+
+                case 76:
+                    this.setLoop();
+                    break;
+
+                case 79:
+                    this.setLoop('end');
+                    break; */
+
+                default:
+                    break;
+            }
+
+            // Escape is handle natively when in full screen
+            // So we only need to worry about non native
+            if (code === 27 && !player.fullscreen.usingNative && player.fullscreen.active) {
+                player.fullscreen.toggle();
+            }
+
+            // Store last code for next cycle
+            this.lastKey = code;
+        } else {
+            this.lastKey = null;
+        }
+    }
+
+    // Toggle menu
+    toggleMenu(event) {
+        controls.toggleMenu.call(this.player, event);
+    }
+
+    // Device is touch enabled
+    firstTouch() {
+        const { player } = this;
+        const { elements } = player;
+
+        player.touch = true;
+
+        // Add touch class
+        toggleClass(elements.container, player.config.classNames.isTouch, true);
+    }
+
+    setTabFocus(event) {
+        const { player } = this;
+        const { elements } = player;
+
+        clearTimeout(this.focusTimer);
+
+        // Ignore any key other than tab
+        if (event.type === 'keydown' && event.which !== 9) {
+            return;
+        }
+
+        // Store reference to event timeStamp
+        if (event.type === 'keydown') {
+            this.lastKeyDown = event.timeStamp;
+        }
+
+        // Remove current classes
+        const removeCurrent = () => {
+            const className = player.config.classNames.tabFocus;
+            const current = getElements.call(player, `.${className}`);
+            toggleClass(current, className, false);
+        };
+
+        // Determine if a key was pressed to trigger this event
+        const wasKeyDown = event.timeStamp - this.lastKeyDown <= 20;
+
+        // Ignore focus events if a key was pressed prior
+        if (event.type === 'focus' && !wasKeyDown) {
+            return;
+        }
+
+        // Remove all current
+        removeCurrent();
+
+        // Delay the adding of classname until the focus has changed
+        // This event fires before the focusin event
+        this.focusTimer = setTimeout(() => {
+            const focused = document.activeElement;
+
+            // Ignore if current focus element isn't inside the player
+            if (!elements.container.contains(focused)) {
+                return;
+            }
+
+            toggleClass(document.activeElement, player.config.classNames.tabFocus, true);
+        }, 10);
+    }
+
+    // Global window & document listeners
+    global(toggle = true) {
+        const { player } = this;
+
+        // Keyboard shortcuts
+        if (player.config.keyboard.global) {
+            toggleListener.call(player, window, 'keydown keyup', this.handleKey, toggle, false);
+        }
+
+        // Click anywhere closes menu
+        toggleListener.call(player, document.body, 'click', this.toggleMenu, toggle);
+
+        // Detect touch by events
+        once.call(player, document.body, 'touchstart', this.firstTouch);
+
+        // Tab focus detection
+        toggleListener.call(player, document.body, 'keydown focus blur', this.setTabFocus, toggle, false, true);
+    }
+
+    // Container listeners
+    container() {
+        const { player } = this;
+        const { config, elements, timers } = player;
+
+        // Keyboard shortcuts
+        if (!config.keyboard.global && config.keyboard.focused) {
+            on.call(player, elements.container, 'keydown keyup', this.handleKey, false);
+        }
+
+        // Toggle controls on mouse events and entering fullscreen
+        on.call(
+            player,
+            elements.container,
+            'mousemove mouseleave touchstart touchmove enterfullscreen exitfullscreen',
+            event => {
+                const { controls: controlsElement } = elements;
+
+                // Remove button states for fullscreen
+                if (controlsElement && event.type === 'enterfullscreen') {
+                    controlsElement.pressed = false;
+                    controlsElement.hover = false;
+                }
+
+                // Show, then hide after a timeout unless another control event occurs
+                const show = ['touchstart', 'touchmove', 'mousemove'].includes(event.type);
+                let delay = 0;
+
+                if (show) {
+                    ui.toggleControls.call(player, true);
+                    // Use longer timeout for touch devices
+                    delay = player.touch ? 3000 : 2000;
+                }
+
+                // Clear timer
+                clearTimeout(timers.controls);
+
+                // Set new timer to prevent flicker when seeking
+                timers.controls = setTimeout(() => ui.toggleControls.call(player, false), delay);
+            },
+        );
+
+        // Set a gutter for Vimeo
+        const setGutter = (ratio, padding, toggle) => {
+            if (!player.isVimeo) {
+                return;
+            }
+
+            const target = player.elements.wrapper.firstChild;
+            const [, y] = ratio;
+            const [videoX, videoY] = getAspectRatio.call(player);
+
+            target.style.maxWidth = toggle ? `${(y / videoY) * videoX}px` : null;
+            target.style.margin = toggle ? '0 auto' : null;
+        };
+
+        // Resize on fullscreen change
+        const setPlayerSize = measure => {
+            // If we don't need to measure the viewport
+            if (!measure) {
+                return setAspectRatio.call(player);
+            }
+
+            const rect = elements.container.getBoundingClientRect();
+            const { width, height } = rect;
+
+            return setAspectRatio.call(player, `${width}:${height}`);
+        };
+
+        const resized = () => {
+            clearTimeout(timers.resized);
+            timers.resized = setTimeout(setPlayerSize, 50);
+        };
+
+        on.call(player, elements.container, 'enterfullscreen exitfullscreen', event => {
+            const { target, usingNative } = player.fullscreen;
+
+            // Ignore events not from target
+            if (target !== elements.container) {
+                return;
+            }
+
+            // If it's not an embed and no ratio specified
+            if (!player.isEmbed && is.empty(player.config.ratio)) {
+                return;
+            }
+
+            const isEnter = event.type === 'enterfullscreen';
+            // Set the player size when entering fullscreen to viewport size
+            const { padding, ratio } = setPlayerSize(isEnter);
+
+            // Set Vimeo gutter
+            setGutter(ratio, padding, isEnter);
+
+            // If not using native fullscreen, we need to check for resizes of viewport
+            if (!usingNative) {
+                if (isEnter) {
+                    on.call(player, window, 'resize', resized);
+                } else {
+                    off.call(player, window, 'resize', resized);
+                }
+            }
+        });
+    }
+
+    // Listen for media events
+    media() {
+        const { player } = this;
+        const { elements } = player;
+
+        // Time change on media
+        on.call(player, player.media, 'timeupdate seeking seeked', event => controls.timeUpdate.call(player, event));
+
+        // Display duration
+        on.call(player, player.media, 'durationchange loadeddata loadedmetadata', event =>
+            controls.durationUpdate.call(player, event),
+        );
+
+        // Handle the media finishing
+        on.call(player, player.media, 'ended', () => {
+            // Show poster on end
+            if (player.isHTML5 && player.isVideo && player.config.resetOnEnd) {
+                // Restart
+                player.restart();
+
+                // Call pause otherwise IE11 will start playing the video again
+                player.pause();
+            }
+        });
+
+        // Check for buffer progress
+        on.call(player, player.media, 'progress playing seeking seeked', event =>
+            controls.updateProgress.call(player, event),
+        );
+
+        // Handle volume changes
+        on.call(player, player.media, 'volumechange', event => controls.updateVolume.call(player, event));
+
+        // Handle play/pause
+        on.call(player, player.media, 'playing play pause ended emptied timeupdate', event =>
+            ui.checkPlaying.call(player, event),
+        );
+
+        // Loading state
+        on.call(player, player.media, 'waiting canplay seeked playing', event => ui.checkLoading.call(player, event));
+
+        // Click video
+        if (player.supported.ui && player.config.clickToPlay && !player.isAudio) {
+            // Re-fetch the wrapper
+            const wrapper = getElement.call(player, `.${player.config.classNames.video}`);
+
+            // Bail if there's no wrapper (this should never happen)
+            if (!is.element(wrapper)) {
+                return;
+            }
+
+            // On click play, pause or restart
+            on.call(player, elements.container, 'click', event => {
+                const targets = [elements.container, wrapper];
+
+                // Ignore if click if not container or in video wrapper
+                if (!targets.includes(event.target) && !wrapper.contains(event.target)) {
+                    return;
+                }
+
+                // Touch devices will just show controls (if hidden)
+                if (player.touch && player.config.hideControls) {
+                    return;
+                }
+
+                if (player.ended) {
+                    this.proxy(event, player.restart, 'restart');
+                    this.proxy(event, player.play, 'play');
+                } else {
+                    this.proxy(event, player.togglePlay, 'play');
+                }
+            });
+        }
+
+        // Disable right click
+        if (player.supported.ui && player.config.disableContextMenu) {
+            on.call(
+                player,
+                elements.wrapper,
+                'contextmenu',
+                event => {
+                    event.preventDefault();
+                },
+                false,
+            );
+        }
+
+        // Volume change
+        on.call(player, player.media, 'volumechange', () => {
+            // Save to storage
+            player.storage.set({
+                volume: player.volume,
+                muted: player.muted,
+            });
+        });
+
+        // Speed change
+        on.call(player, player.media, 'ratechange', () => {
+            // Update UI
+            controls.updateSetting.call(player, 'speed');
+
+            // Save to storage
+            player.storage.set({ speed: player.speed });
+        });
+
+        // Quality change
+        on.call(player, player.media, 'qualitychange', event => {
+            // Update UI
+            controls.updateSetting.call(player, 'quality', null, event.detail.quality);
+        });
+
+        // Update download link when ready and if quality changes
+        on.call(player, player.media, 'ready qualitychange', () => {
+            controls.setDownloadUrl.call(player);
+        });
+
+        // Proxy events to container
+        // Bubble up key events for Edge
+        const proxyEvents = player.config.events.concat(['keyup', 'keydown']).join(' ');
+
+        on.call(player, player.media, proxyEvents, event => {
+            let { detail = {} } = event;
+
+            // Get error details from media
+            if (event.type === 'error') {
+                detail = player.media.error;
+            }
+
+            triggerEvent.call(player, elements.container, event.type, true, detail);
+        });
+    }
+
+    // Run default and custom handlers
+    proxy(event, defaultHandler, customHandlerKey) {
+        const { player } = this;
+        const customHandler = player.config.listeners[customHandlerKey];
+        const hasCustomHandler = is.function(customHandler);
+        let returned = true;
+
+        // Execute custom handler
+        if (hasCustomHandler) {
+            returned = customHandler.call(player, event);
+        }
+
+        // Only call default handler if not prevented in custom handler
+        if (returned !== false && is.function(defaultHandler)) {
+            defaultHandler.call(player, event);
+        }
+    }
+
+    // Trigger custom and default handlers
+    bind(element, type, defaultHandler, customHandlerKey, passive = true) {
+        const { player } = this;
+        const customHandler = player.config.listeners[customHandlerKey];
+        const hasCustomHandler = is.function(customHandler);
+
+        on.call(
+            player,
+            element,
+            type,
+            event => this.proxy(event, defaultHandler, customHandlerKey),
+            passive && !hasCustomHandler,
+        );
+    }
+
+    // Listen for control events
+    controls() {
+        const { player } = this;
+        const { elements } = player;
+        // IE doesn't support input event, so we fallback to change
+        const inputEvent = browser.isIE ? 'change' : 'input';
+
+        // Play/pause toggle
+        if (elements.buttons.play) {
+            Array.from(elements.buttons.play).forEach(button => {
+                this.bind(button, 'click', player.togglePlay, 'play');
+            });
+        }
+
+        // Pause
+        this.bind(elements.buttons.restart, 'click', player.restart, 'restart');
+
+        // Rewind
+        this.bind(elements.buttons.rewind, 'click', player.rewind, 'rewind');
+
+        // Rewind
+        this.bind(elements.buttons.fastForward, 'click', player.forward, 'fastForward');
+
+        // Mute toggle
+        this.bind(
+            elements.buttons.mute,
+            'click',
+            () => {
+                player.muted = !player.muted;
+            },
+            'mute',
+        );
+
+        // Captions toggle
+        this.bind(elements.buttons.captions, 'click', () => player.toggleCaptions());
+
+        // Download
+        this.bind(
+            elements.buttons.download,
+            'click',
+            () => {
+                triggerEvent.call(player, player.media, 'download');
+            },
+            'download',
+        );
+
+        // Fullscreen toggle
+        this.bind(
+            elements.buttons.fullscreen,
+            'click',
+            () => {
+                player.fullscreen.toggle();
+            },
+            'fullscreen',
+        );
+
+        // Picture-in-Picture
+        this.bind(
+            elements.buttons.pip,
+            'click',
+            () => {
+                player.pip = 'toggle';
+            },
+            'pip',
+        );
+
+        // Airplay
+        this.bind(elements.buttons.airplay, 'click', player.airplay, 'airplay');
+
+        // Settings menu - click toggle
+        this.bind(
+            elements.buttons.settings,
+            'click',
+            event => {
+                // Prevent the document click listener closing the menu
+                event.stopPropagation();
+                event.preventDefault();
+
+                controls.toggleMenu.call(player, event);
+            },
+            null,
+            false
+        ); // Can't be passive as we're preventing default
+
+        // Settings menu - keyboard toggle
+        // We have to bind to keyup otherwise Firefox triggers a click when a keydown event handler shifts focus
+        // https://bugzilla.mozilla.org/show_bug.cgi?id=1220143
+        this.bind(
+            elements.buttons.settings,
+            'keyup',
+            event => {
+                const code = event.which;
+
+                // We only care about space and return
+                if (![13, 32].includes(code)) {
+                    return;
+                }
+
+                // Because return triggers a click anyway, all we need to do is set focus
+                if (code === 13) {
+                    controls.focusFirstMenuItem.call(player, null, true);
+                    return;
+                }
+
+                // Prevent scroll
+                event.preventDefault();
+
+                // Prevent playing video (Firefox)
+                event.stopPropagation();
+
+                // Toggle menu
+                controls.toggleMenu.call(player, event);
+            },
+            null,
+            false, // Can't be passive as we're preventing default
+        );
+
+        // Escape closes menu
+        this.bind(elements.settings.menu, 'keydown', event => {
+            if (event.which === 27) {
+                controls.toggleMenu.call(player, event);
+            }
+        });
+
+        // Set range input alternative "value", which matches the tooltip time (#954)
+        this.bind(elements.inputs.seek, 'mousedown mousemove', event => {
+            const rect = elements.progress.getBoundingClientRect();
+            const percent = (100 / rect.width) * (event.pageX - rect.left);
+            event.currentTarget.setAttribute('seek-value', percent);
+        });
+
+        // Pause while seeking
+        this.bind(elements.inputs.seek, 'mousedown mouseup keydown keyup touchstart touchend', event => {
+            const seek = event.currentTarget;
+            const code = event.keyCode ? event.keyCode : event.which;
+            const attribute = 'play-on-seeked';
+
+            if (is.keyboardEvent(event) && code !== 39 && code !== 37) {
+                return;
+            }
+
+            // Record seek time so we can prevent hiding controls for a few seconds after seek
+            player.lastSeekTime = Date.now();
+
+            // Was playing before?
+            const play = seek.hasAttribute(attribute);
+            // Done seeking
+            const done = ['mouseup', 'touchend', 'keyup'].includes(event.type);
+
+            // If we're done seeking and it was playing, resume playback
+            if (play && done) {
+                seek.removeAttribute(attribute);
+                player.play();
+            } else if (!done && player.playing) {
+                seek.setAttribute(attribute, '');
+                player.pause();
+            }
+        });
+
+        // Fix range inputs on iOS
+        // Super weird iOS bug where after you interact with an <input type="range">,
+        // it takes over further interactions on the page. This is a hack
+        if (browser.isIos) {
+            const inputs = getElements.call(player, 'input[type="range"]');
+            Array.from(inputs).forEach(input => this.bind(input, inputEvent, event => repaint(event.target)));
+        }
+
+        // Seek
+        this.bind(
+            elements.inputs.seek,
+            inputEvent,
+            event => {
+                const seek = event.currentTarget;
+                // If it exists, use seek-value instead of "value" for consistency with tooltip time (#954)
+                let seekTo = seek.getAttribute('seek-value');
+
+                if (is.empty(seekTo)) {
+                    seekTo = seek.value;
+                }
+
+                seek.removeAttribute('seek-value');
+
+                player.currentTime = (seekTo / seek.max) * player.duration;
+            },
+            'seek',
+        );
+
+        // Seek tooltip
+        this.bind(elements.progress, 'mouseenter mouseleave mousemove', event =>
+            controls.updateSeekTooltip.call(player, event),
+        );
+
+        // Preview thumbnails plugin
+        // TODO: Really need to work on some sort of plug-in wide event bus or pub-sub for this
+        this.bind(elements.progress, 'mousemove touchmove', event => {
+            const { previewThumbnails } = player;
+
+            if (previewThumbnails && previewThumbnails.loaded) {
+                previewThumbnails.startMove(event);
+            }
+        });
+
+        // Hide thumbnail preview - on mouse click, mouse leave, and video play/seek. All four are required, e.g., for buffering
+        this.bind(elements.progress, 'mouseleave touchend click', () => {
+            const { previewThumbnails } = player;
+
+            if (previewThumbnails && previewThumbnails.loaded) {
+                previewThumbnails.endMove(false, true);
+            }
+        });
+
+        // Show scrubbing preview
+        this.bind(elements.progress, 'mousedown touchstart', event => {
+            const { previewThumbnails } = player;
+
+            if (previewThumbnails && previewThumbnails.loaded) {
+                previewThumbnails.startScrubbing(event);
+            }
+        });
+
+        this.bind(elements.progress, 'mouseup touchend', event => {
+            const { previewThumbnails } = player;
+
+            if (previewThumbnails && previewThumbnails.loaded) {
+                previewThumbnails.endScrubbing(event);
+            }
+        });
+
+        // Polyfill for lower fill in <input type="range"> for webkit
+        if (browser.isWebkit) {
+            Array.from(getElements.call(player, 'input[type="range"]')).forEach(element => {
+                this.bind(element, 'input', event => controls.updateRangeFill.call(player, event.target));
+            });
+        }
+
+        // Current time invert
+        // Only if one time element is used for both currentTime and duration
+        if (player.config.toggleInvert && !is.element(elements.display.duration)) {
+            this.bind(elements.display.currentTime, 'click', () => {
+                // Do nothing if we're at the start
+                if (player.currentTime === 0) {
+                    return;
+                }
+
+                player.config.invertTime = !player.config.invertTime;
+
+                controls.timeUpdate.call(player);
+            });
+        }
+
+        // Volume
+        this.bind(
+            elements.inputs.volume,
+            inputEvent,
+            event => {
+                player.volume = event.target.value;
+            },
+            'volume',
+        );
+
+        // Update controls.hover state (used for ui.toggleControls to avoid hiding when interacting)
+        this.bind(elements.controls, 'mouseenter mouseleave', event => {
+            elements.controls.hover = !player.touch && event.type === 'mouseenter';
+        });
+
+        // Update controls.pressed state (used for ui.toggleControls to avoid hiding when interacting)
+        this.bind(elements.controls, 'mousedown mouseup touchstart touchend touchcancel', event => {
+            elements.controls.pressed = ['mousedown', 'touchstart'].includes(event.type);
+        });
+
+        // Show controls when they receive focus (e.g., when using keyboard tab key)
+        this.bind(elements.controls, 'focusin', () => {
+            const { config, timers } = player;
+
+            // Skip transition to prevent focus from scrolling the parent element
+            toggleClass(elements.controls, config.classNames.noTransition, true);
+
+            // Toggle
+            ui.toggleControls.call(player, true);
+
+            // Restore transition
+            setTimeout(() => {
+                toggleClass(elements.controls, config.classNames.noTransition, false);
+            }, 0);
+
+            // Delay a little more for mouse users
+            const delay = this.touch ? 3000 : 4000;
+
+            // Clear timer
+            clearTimeout(timers.controls);
+
+            // Hide again after delay
+            timers.controls = setTimeout(() => ui.toggleControls.call(player, false), delay);
+        });
+
+        // Mouse wheel for volume
+        this.bind(
+            elements.inputs.volume,
+            'wheel',
+            event => {
+                // Detect "natural" scroll - suppored on OS X Safari only
+                // Other browsers on OS X will be inverted until support improves
+                const inverted = event.webkitDirectionInvertedFromDevice;
+                // Get delta from event. Invert if `inverted` is true
+                const [x, y] = [event.deltaX, -event.deltaY].map(value => (inverted ? -value : value));
+                // Using the biggest delta, normalize to 1 or -1 (or 0 if no delta)
+                const direction = Math.sign(Math.abs(x) > Math.abs(y) ? x : y);
+
+                // Change the volume by 2%
+                player.increaseVolume(direction / 50);
+
+                // Don't break page scrolling at max and min
+                const { volume } = player.media;
+                if ((direction === 1 && volume < 1) || (direction === -1 && volume > 0)) {
+                    event.preventDefault();
+                }
+            },
+            'volume',
+            false,
+        );
+    }
+}
+
+export default Listeners;

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/media.js

@@ -0,0 +1,61 @@
+// ==========================================================================
+// Plyr Media
+// ==========================================================================
+
+import html5 from './html5';
+import vimeo from './plugins/vimeo';
+import youtube from './plugins/youtube';
+import { createElement, toggleClass, wrap } from './utils/elements';
+
+const media = {
+    // Setup media
+    setup() {
+        // If there's no media, bail
+        if (!this.media) {
+            this.debug.warn('No media element found!');
+            return;
+        }
+
+        // Add type class
+        toggleClass(this.elements.container, this.config.classNames.type.replace('{0}', this.type), true);
+
+        // Add provider class
+        toggleClass(this.elements.container, this.config.classNames.provider.replace('{0}', this.provider), true);
+
+        // Add video class for embeds
+        // This will require changes if audio embeds are added
+        if (this.isEmbed) {
+            toggleClass(this.elements.container, this.config.classNames.type.replace('{0}', 'video'), true);
+        }
+
+        // Inject the player wrapper
+        if (this.isVideo) {
+            // Create the wrapper div
+            this.elements.wrapper = createElement('div', {
+                class: this.config.classNames.video,
+            });
+
+            // Wrap the video in a container
+            wrap(this.media, this.elements.wrapper);
+
+            // Faux poster container
+            if (this.isEmbed) {
+                this.elements.poster = createElement('div', {
+                    class: this.config.classNames.poster,
+                });
+
+                this.elements.wrapper.appendChild(this.elements.poster);
+            }
+        }
+
+        if (this.isHTML5) {
+            html5.setup.call(this);
+        } else if (this.isYouTube) {
+            youtube.setup.call(this);
+        } else if (this.isVimeo) {
+            vimeo.setup.call(this);
+        }
+    },
+};
+
+export default media;

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/plugins/ads.js

@@ -0,0 +1,636 @@
+// ==========================================================================
+// Advertisement plugin using Google IMA HTML5 SDK
+// Create an account with our ad partner, vi here:
+// https://www.vi.ai/publisher-video-monetization/
+// ==========================================================================
+
+/* global google */
+
+import { createElement } from '../utils/elements';
+import { triggerEvent } from '../utils/events';
+import i18n from '../utils/i18n';
+import is from '../utils/is';
+import loadScript from '../utils/load-script';
+import { formatTime } from '../utils/time';
+import { buildUrlParams } from '../utils/urls';
+
+const destroy = instance => {
+    // Destroy our adsManager
+    if (instance.manager) {
+        instance.manager.destroy();
+    }
+
+    // Destroy our adsManager
+    if (instance.elements.displayContainer) {
+        instance.elements.displayContainer.destroy();
+    }
+
+    instance.elements.container.remove();
+};
+
+class Ads {
+    /**
+     * Ads constructor.
+     * @param {Object} player
+     * @return {Ads}
+     */
+    constructor(player) {
+        this.player = player;
+        this.config = player.config.ads;
+        this.playing = false;
+        this.initialized = false;
+        this.elements = {
+            container: null,
+            displayContainer: null,
+        };
+        this.manager = null;
+        this.loader = null;
+        this.cuePoints = null;
+        this.events = {};
+        this.safetyTimer = null;
+        this.countdownTimer = null;
+
+        // Setup a promise to resolve when the IMA manager is ready
+        this.managerPromise = new Promise((resolve, reject) => {
+            // The ad is loaded and ready
+            this.on('loaded', resolve);
+
+            // Ads failed
+            this.on('error', reject);
+        });
+
+        this.load();
+    }
+
+    get enabled() {
+        const { config } = this;
+
+        return (
+            this.player.isHTML5 &&
+            this.player.isVideo &&
+            config.enabled &&
+            (!is.empty(config.publisherId) || is.url(config.tagUrl))
+        );
+    }
+
+    /**
+     * Load the IMA SDK
+     */
+    load() {
+        if (!this.enabled) {
+            return;
+        }
+
+        // Check if the Google IMA3 SDK is loaded or load it ourselves
+        if (!is.object(window.google) || !is.object(window.google.ima)) {
+            loadScript(this.player.config.urls.googleIMA.sdk)
+                .then(() => {
+                    this.ready();
+                })
+                .catch(() => {
+                    // Script failed to load or is blocked
+                    this.trigger('error', new Error('Google IMA SDK failed to load'));
+                });
+        } else {
+            this.ready();
+        }
+    }
+
+    /**
+     * Get the ads instance ready
+     */
+    ready() {
+        // Double check we're enabled
+        if (!this.enabled) {
+            destroy(this);
+        }
+
+        // Start ticking our safety timer. If the whole advertisement
+        // thing doesn't resolve within our set time; we bail
+        this.startSafetyTimer(12000, 'ready()');
+
+        // Clear the safety timer
+        this.managerPromise.then(() => {
+            this.clearSafetyTimer('onAdsManagerLoaded()');
+        });
+
+        // Set listeners on the Plyr instance
+        this.listeners();
+
+        // Setup the IMA SDK
+        this.setupIMA();
+    }
+
+    // Build the tag URL
+    get tagUrl() {
+        const { config } = this;
+
+        if (is.url(config.tagUrl)) {
+            return config.tagUrl;
+        }
+
+        const params = {
+            AV_PUBLISHERID: '58c25bb0073ef448b1087ad6',
+            AV_CHANNELID: '5a0458dc28a06145e4519d21',
+            AV_URL: window.location.hostname,
+            cb: Date.now(),
+            AV_WIDTH: 640,
+            AV_HEIGHT: 480,
+            AV_CDIM2: config.publisherId,
+        };
+
+        const base = 'https://go.aniview.com/api/adserver6/vast/';
+
+        return `${base}?${buildUrlParams(params)}`;
+    }
+
+    /**
+     * In order for the SDK to display ads for our video, we need to tell it where to put them,
+     * so here we define our ad container. This div is set up to render on top of the video player.
+     * Using the code below, we tell the SDK to render ads within that div. We also provide a
+     * handle to the content video player - the SDK will poll the current time of our player to
+     * properly place mid-rolls. After we create the ad display container, we initialize it. On
+     * mobile devices, this initialization is done as the result of a user action.
+     */
+    setupIMA() {
+        // Create the container for our advertisements
+        this.elements.container = createElement('div', {
+            class: this.player.config.classNames.ads,
+        });
+
+        this.player.elements.container.appendChild(this.elements.container);
+
+        // So we can run VPAID2
+        google.ima.settings.setVpaidMode(google.ima.ImaSdkSettings.VpaidMode.ENABLED);
+
+        // Set language
+        google.ima.settings.setLocale(this.player.config.ads.language);
+
+        // Set playback for iOS10+
+        google.ima.settings.setDisableCustomPlaybackForIOS10Plus(this.player.config.playsinline);
+
+        // We assume the adContainer is the video container of the plyr element that will house the ads
+        this.elements.displayContainer = new google.ima.AdDisplayContainer(this.elements.container, this.player.media);
+
+        // Request video ads to be pre-loaded
+        this.requestAds();
+    }
+
+    /**
+     * Request advertisements
+     */
+    requestAds() {
+        const { container } = this.player.elements;
+
+        try {
+            // Create ads loader
+            this.loader = new google.ima.AdsLoader(this.elements.displayContainer);
+
+            // Listen and respond to ads loaded and error events
+            this.loader.addEventListener(
+                google.ima.AdsManagerLoadedEvent.Type.ADS_MANAGER_LOADED,
+                event => this.onAdsManagerLoaded(event),
+                false,
+            );
+            this.loader.addEventListener(google.ima.AdErrorEvent.Type.AD_ERROR, error => this.onAdError(error), false);
+
+            // Request video ads
+            const request = new google.ima.AdsRequest();
+            request.adTagUrl = this.tagUrl;
+
+            // Specify the linear and nonlinear slot sizes. This helps the SDK
+            // to select the correct creative if multiple are returned
+            request.linearAdSlotWidth = container.offsetWidth;
+            request.linearAdSlotHeight = container.offsetHeight;
+            request.nonLinearAdSlotWidth = container.offsetWidth;
+            request.nonLinearAdSlotHeight = container.offsetHeight;
+
+            // We only overlay ads as we only support video.
+            request.forceNonLinearFullSlot = false;
+
+            // Mute based on current state
+            request.setAdWillPlayMuted(!this.player.muted);
+
+            this.loader.requestAds(request);
+        } catch (e) {
+            this.onAdError(e);
+        }
+    }
+
+    /**
+     * Update the ad countdown
+     * @param {Boolean} start
+     */
+    pollCountdown(start = false) {
+        if (!start) {
+            clearInterval(this.countdownTimer);
+            this.elements.container.removeAttribute('data-badge-text');
+            return;
+        }
+
+        const update = () => {
+            const time = formatTime(Math.max(this.manager.getRemainingTime(), 0));
+            const label = `${i18n.get('advertisement', this.player.config)} - ${time}`;
+            this.elements.container.setAttribute('data-badge-text', label);
+        };
+
+        this.countdownTimer = setInterval(update, 100);
+    }
+
+    /**
+     * This method is called whenever the ads are ready inside the AdDisplayContainer
+     * @param {Event} adsManagerLoadedEvent
+     */
+    onAdsManagerLoaded(event) {
+        // Load could occur after a source change (race condition)
+        if (!this.enabled) {
+            return;
+        }
+
+        // Get the ads manager
+        const settings = new google.ima.AdsRenderingSettings();
+
+        // Tell the SDK to save and restore content video state on our behalf
+        settings.restoreCustomPlaybackStateOnAdBreakComplete = true;
+        settings.enablePreloading = true;
+
+        // The SDK is polling currentTime on the contentPlayback. And needs a duration
+        // so it can determine when to start the mid- and post-roll
+        this.manager = event.getAdsManager(this.player, settings);
+
+        // Get the cue points for any mid-rolls by filtering out the pre- and post-roll
+        this.cuePoints = this.manager.getCuePoints();
+
+        // Add listeners to the required events
+        // Advertisement error events
+        this.manager.addEventListener(google.ima.AdErrorEvent.Type.AD_ERROR, error => this.onAdError(error));
+
+        // Advertisement regular events
+        Object.keys(google.ima.AdEvent.Type).forEach(type => {
+            this.manager.addEventListener(google.ima.AdEvent.Type[type], e => this.onAdEvent(e));
+        });
+
+        // Resolve our adsManager
+        this.trigger('loaded');
+    }
+
+    addCuePoints() {
+        // Add advertisement cue's within the time line if available
+        if (!is.empty(this.cuePoints)) {
+            this.cuePoints.forEach(cuePoint => {
+                if (cuePoint !== 0 && cuePoint !== -1 && cuePoint < this.player.duration) {
+                    const seekElement = this.player.elements.progress;
+
+                    if (is.element(seekElement)) {
+                        const cuePercentage = (100 / this.player.duration) * cuePoint;
+                        const cue = createElement('span', {
+                            class: this.player.config.classNames.cues,
+                        });
+
+                        cue.style.left = `${cuePercentage.toString()}%`;
+                        seekElement.appendChild(cue);
+                    }
+                }
+            });
+        }
+    }
+
+    /**
+     * This is where all the event handling takes place. Retrieve the ad from the event. Some
+     * events (e.g. ALL_ADS_COMPLETED) don't have the ad object associated
+     * https://developers.google.com/interactive-media-ads/docs/sdks/html5/v3/apis#ima.AdEvent.Type
+     * @param {Event} event
+     */
+    onAdEvent(event) {
+        const { container } = this.player.elements;
+        // Retrieve the ad from the event. Some events (e.g. ALL_ADS_COMPLETED)
+        // don't have ad object associated
+        const ad = event.getAd();
+        const adData = event.getAdData();
+
+        // Proxy event
+        const dispatchEvent = type => {
+            triggerEvent.call(this.player, this.player.media, `ads${type.replace(/_/g, '').toLowerCase()}`);
+        };
+
+        // Bubble the event
+        dispatchEvent(event.type);
+
+        switch (event.type) {
+            case google.ima.AdEvent.Type.LOADED:
+                // This is the first event sent for an ad - it is possible to determine whether the
+                // ad is a video ad or an overlay
+                this.trigger('loaded');
+
+                // Start countdown
+                this.pollCountdown(true);
+
+                if (!ad.isLinear()) {
+                    // Position AdDisplayContainer correctly for overlay
+                    ad.width = container.offsetWidth;
+                    ad.height = container.offsetHeight;
+                }
+
+                // console.info('Ad type: ' + event.getAd().getAdPodInfo().getPodIndex());
+                // console.info('Ad time: ' + event.getAd().getAdPodInfo().getTimeOffset());
+
+                break;
+
+            case google.ima.AdEvent.Type.STARTED:
+                // Set volume to match player
+                this.manager.setVolume(this.player.volume);
+
+                break;
+
+            case google.ima.AdEvent.Type.ALL_ADS_COMPLETED:
+                // All ads for the current videos are done. We can now request new advertisements
+                // in case the video is re-played
+
+                // TODO: Example for what happens when a next video in a playlist would be loaded.
+                // So here we load a new video when all ads are done.
+                // Then we load new ads within a new adsManager. When the video
+                // Is started - after - the ads are loaded, then we get ads.
+                // You can also easily test cancelling and reloading by running
+                // player.ads.cancel() and player.ads.play from the console I guess.
+                // this.player.source = {
+                //     type: 'video',
+                //     title: 'View From A Blue Moon',
+                //     sources: [{
+                //         src:
+                // 'https://cdn.plyr.io/static/demo/View_From_A_Blue_Moon_Trailer-HD.mp4', type:
+                // 'video/mp4', }], poster:
+                // 'https://cdn.plyr.io/static/demo/View_From_A_Blue_Moon_Trailer-HD.jpg', tracks:
+                // [ { kind: 'captions', label: 'English', srclang: 'en', src:
+                // 'https://cdn.plyr.io/static/demo/View_From_A_Blue_Moon_Trailer-HD.en.vtt',
+                // default: true, }, { kind: 'captions', label: 'French', srclang: 'fr', src:
+                // 'https://cdn.plyr.io/static/demo/View_From_A_Blue_Moon_Trailer-HD.fr.vtt', }, ],
+                // };
+
+                // TODO: So there is still this thing where a video should only be allowed to start
+                // playing when the IMA SDK is ready or has failed
+
+                this.loadAds();
+
+                break;
+
+            case google.ima.AdEvent.Type.CONTENT_PAUSE_REQUESTED:
+                // This event indicates the ad has started - the video player can adjust the UI,
+                // for example display a pause button and remaining time. Fired when content should
+                // be paused. This usually happens right before an ad is about to cover the content
+
+                this.pauseContent();
+
+                break;
+
+            case google.ima.AdEvent.Type.CONTENT_RESUME_REQUESTED:
+                // This event indicates the ad has finished - the video player can perform
+                // appropriate UI actions, such as removing the timer for remaining time detection.
+                // Fired when content should be resumed. This usually happens when an ad finishes
+                // or collapses
+
+                this.pollCountdown();
+
+                this.resumeContent();
+
+                break;
+
+            case google.ima.AdEvent.Type.LOG:
+                if (adData.adError) {
+                    this.player.debug.warn(`Non-fatal ad error: ${adData.adError.getMessage()}`);
+                }
+
+                break;
+
+            default:
+                break;
+        }
+    }
+
+    /**
+     * Any ad error handling comes through here
+     * @param {Event} event
+     */
+    onAdError(event) {
+        this.cancel();
+        this.player.debug.warn('Ads error', event);
+    }
+
+    /**
+     * Setup hooks for Plyr and window events. This ensures
+     * the mid- and post-roll launch at the correct time. And
+     * resize the advertisement when the player resizes
+     */
+    listeners() {
+        const { container } = this.player.elements;
+        let time;
+
+        this.player.on('canplay', () => {
+            this.addCuePoints();
+        });
+
+        this.player.on('ended', () => {
+            this.loader.contentComplete();
+        });
+
+        this.player.on('timeupdate', () => {
+            time = this.player.currentTime;
+        });
+
+        this.player.on('seeked', () => {
+            const seekedTime = this.player.currentTime;
+
+            if (is.empty(this.cuePoints)) {
+                return;
+            }
+
+            this.cuePoints.forEach((cuePoint, index) => {
+                if (time < cuePoint && cuePoint < seekedTime) {
+                    this.manager.discardAdBreak();
+                    this.cuePoints.splice(index, 1);
+                }
+            });
+        });
+
+        // Listen to the resizing of the window. And resize ad accordingly
+        // TODO: eventually implement ResizeObserver
+        window.addEventListener('resize', () => {
+            if (this.manager) {
+                this.manager.resize(container.offsetWidth, container.offsetHeight, google.ima.ViewMode.NORMAL);
+            }
+        });
+    }
+
+    /**
+     * Initialize the adsManager and start playing advertisements
+     */
+    play() {
+        const { container } = this.player.elements;
+
+        if (!this.managerPromise) {
+            this.resumeContent();
+        }
+
+        // Play the requested advertisement whenever the adsManager is ready
+        this.managerPromise
+            .then(() => {
+                // Set volume to match player
+                this.manager.setVolume(this.player.volume);
+
+                // Initialize the container. Must be done via a user action on mobile devices
+                this.elements.displayContainer.initialize();
+
+                try {
+                    if (!this.initialized) {
+                        // Initialize the ads manager. Ad rules playlist will start at this time
+                        this.manager.init(container.offsetWidth, container.offsetHeight, google.ima.ViewMode.NORMAL);
+
+                        // Call play to start showing the ad. Single video and overlay ads will
+                        // start at this time; the call will be ignored for ad rules
+                        this.manager.start();
+                    }
+
+                    this.initialized = true;
+                } catch (adError) {
+                    // An error may be thrown if there was a problem with the
+                    // VAST response
+                    this.onAdError(adError);
+                }
+            })
+            .catch(() => {});
+    }
+
+    /**
+     * Resume our video
+     */
+    resumeContent() {
+        // Hide the advertisement container
+        this.elements.container.style.zIndex = '';
+
+        // Ad is stopped
+        this.playing = false;
+
+        // Play video
+        this.player.media.play();
+    }
+
+    /**
+     * Pause our video
+     */
+    pauseContent() {
+        // Show the advertisement container
+        this.elements.container.style.zIndex = 3;
+
+        // Ad is playing
+        this.playing = true;
+
+        // Pause our video.
+        this.player.media.pause();
+    }
+
+    /**
+     * Destroy the adsManager so we can grab new ads after this. If we don't then we're not
+     * allowed to call new ads based on google policies, as they interpret this as an accidental
+     * video requests. https://developers.google.com/interactive-
+     * media-ads/docs/sdks/android/faq#8
+     */
+    cancel() {
+        // Pause our video
+        if (this.initialized) {
+            this.resumeContent();
+        }
+
+        // Tell our instance that we're done for now
+        this.trigger('error');
+
+        // Re-create our adsManager
+        this.loadAds();
+    }
+
+    /**
+     * Re-create our adsManager
+     */
+    loadAds() {
+        // Tell our adsManager to go bye bye
+        this.managerPromise
+            .then(() => {
+                // Destroy our adsManager
+                if (this.manager) {
+                    this.manager.destroy();
+                }
+
+                // Re-set our adsManager promises
+                this.managerPromise = new Promise(resolve => {
+                    this.on('loaded', resolve);
+                    this.player.debug.log(this.manager);
+                });
+
+                // Now request some new advertisements
+                this.requestAds();
+            })
+            .catch(() => {});
+    }
+
+    /**
+     * Handles callbacks after an ad event was invoked
+     * @param {String} event - Event type
+     */
+    trigger(event, ...args) {
+        const handlers = this.events[event];
+
+        if (is.array(handlers)) {
+            handlers.forEach(handler => {
+                if (is.function(handler)) {
+                    handler.apply(this, args);
+                }
+            });
+        }
+    }
+
+    /**
+     * Add event listeners
+     * @param {String} event - Event type
+     * @param {Function} callback - Callback for when event occurs
+     * @return {Ads}
+     */
+    on(event, callback) {
+        if (!is.array(this.events[event])) {
+            this.events[event] = [];
+        }
+
+        this.events[event].push(callback);
+
+        return this;
+    }
+
+    /**
+     * Setup a safety timer for when the ad network doesn't respond for whatever reason.
+     * The advertisement has 12 seconds to get its things together. We stop this timer when the
+     * advertisement is playing, or when a user action is required to start, then we clear the
+     * timer on ad ready
+     * @param {Number} time
+     * @param {String} from
+     */
+    startSafetyTimer(time, from) {
+        this.player.debug.log(`Safety timer invoked from: ${from}`);
+
+        this.safetyTimer = setTimeout(() => {
+            this.cancel();
+            this.clearSafetyTimer('startSafetyTimer()');
+        }, time);
+    }
+
+    /**
+     * Clear our safety timer(s)
+     * @param {String} from
+     */
+    clearSafetyTimer(from) {
+        if (!is.nullOrUndefined(this.safetyTimer)) {
+            this.player.debug.log(`Safety timer cleared from: ${from}`);
+
+            clearTimeout(this.safetyTimer);
+            this.safetyTimer = null;
+        }
+    }
+}
+
+export default Ads;

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/plugins/preview-thumbnails.js

@@ -0,0 +1,692 @@
+import { createElement } from '../utils/elements';
+import { once } from '../utils/events';
+import fetch from '../utils/fetch';
+import is from '../utils/is';
+import { formatTime } from '../utils/time';
+
+// Arg: vttDataString example: "WEBVTT\n\n1\n00:00:05.000 --> 00:00:10.000\n1080p-00001.jpg"
+const parseVtt = vttDataString => {
+    const processedList = [];
+    const frames = vttDataString.split(/\r\n\r\n|\n\n|\r\r/);
+
+    frames.forEach(frame => {
+        const result = {};
+        const lines = frame.split(/\r\n|\n|\r/);
+
+        lines.forEach(line => {
+            if (!is.number(result.startTime)) {
+                // The line with start and end times on it is the first line of interest
+                const matchTimes = line.match(
+                    /([0-9]{2})?:?([0-9]{2}):([0-9]{2}).([0-9]{2,3})( ?--> ?)([0-9]{2})?:?([0-9]{2}):([0-9]{2}).([0-9]{2,3})/,
+                ); // Note that this currently ignores caption formatting directives that are optionally on the end of this line - fine for non-captions VTT
+
+                if (matchTimes) {
+                    result.startTime =
+                        Number(matchTimes[1] || 0) * 60 * 60 +
+                        Number(matchTimes[2]) * 60 +
+                        Number(matchTimes[3]) +
+                        Number(`0.${matchTimes[4]}`);
+                    result.endTime =
+                        Number(matchTimes[6] || 0) * 60 * 60 +
+                        Number(matchTimes[7]) * 60 +
+                        Number(matchTimes[8]) +
+                        Number(`0.${matchTimes[9]}`);
+                }
+            } else if (!is.empty(line.trim()) && is.empty(result.text)) {
+                // If we already have the startTime, then we're definitely up to the text line(s)
+                const lineSplit = line.trim().split('#xywh=');
+                [result.text] = lineSplit;
+
+                // If there's content in lineSplit[1], then we have sprites. If not, then it's just one frame per image
+                if (lineSplit[1]) {
+                    [result.x, result.y, result.w, result.h] = lineSplit[1].split(',');
+                }
+            }
+        });
+
+        if (result.text) {
+            processedList.push(result);
+        }
+    });
+
+    return processedList;
+};
+
+/**
+ * Preview thumbnails for seek hover and scrubbing
+ * Seeking: Hover over the seek bar (desktop only): shows a small preview container above the seek bar
+ * Scrubbing: Click and drag the seek bar (desktop and mobile): shows the preview image over the entire video, as if the video is scrubbing at very high speed
+ *
+ * Notes:
+ * - Thumbs are set via JS settings on Plyr init, not HTML5 'track' property. Using the track property would be a bit gross, because it doesn't support custom 'kinds'. kind=metadata might be used for something else, and we want to allow multiple thumbnails tracks. Tracks must have a unique combination of 'kind' and 'label'. We would have to do something like kind=metadata,label=thumbnails1 / kind=metadata,label=thumbnails2. Square peg, round hole
+ * - VTT info: the image URL is relative to the VTT, not the current document. But if the url starts with a slash, it will naturally be relative to the current domain. https://support.jwplayer.com/articles/how-to-add-preview-thumbnails
+ * - This implementation uses multiple separate img elements. Other implementations use background-image on one element. This would be nice and simple, but Firefox and Safari have flickering issues with replacing backgrounds of larger images. It seems that YouTube perhaps only avoids this because they don't have the option for high-res previews (even the fullscreen ones, when mousedown/seeking). Images appear over the top of each other, and previous ones are discarded once the new ones have been rendered
+ */
+
+const fitRatio = (ratio, outer) => {
+    const targetRatio = outer.width / outer.height;
+    const result = {};
+    if (ratio > targetRatio) {
+        result.width = outer.width;
+        result.height = (1 / ratio) * outer.width;
+    } else {
+        result.height = outer.height;
+        result.width = ratio * outer.height;
+    }
+
+    return result;
+};
+
+class PreviewThumbnails {
+    /**
+     * PreviewThumbnails constructor.
+     * @param {Plyr} player
+     * @return {PreviewThumbnails}
+     */
+    constructor(player) {
+        this.player = player;
+        this.thumbnails = [];
+        this.loaded = false;
+        this.lastMouseMoveTime = Date.now();
+        this.mouseDown = false;
+        this.loadedImages = [];
+
+        this.elements = {
+            thumb: {},
+            scrubbing: {},
+        };
+
+        this.load();
+    }
+
+    get enabled() {
+        return this.player.isHTML5 && this.player.isVideo && this.player.config.previewThumbnails.enabled;
+    }
+
+    load() {
+        // Toggle the regular seek tooltip
+        if (this.player.elements.display.seekTooltip) {
+            this.player.elements.display.seekTooltip.hidden = this.enabled;
+        }
+
+        if (!this.enabled) {
+            return;
+        }
+
+        this.getThumbnails().then(() => {
+            if (!this.enabled) {
+                return;
+            }
+
+            // Render DOM elements
+            this.render();
+
+            // Check to see if thumb container size was specified manually in CSS
+            this.determineContainerAutoSizing();
+
+            this.loaded = true;
+        });
+    }
+
+    // Download VTT files and parse them
+    getThumbnails() {
+        return new Promise(resolve => {
+            const { src } = this.player.config.previewThumbnails;
+
+            if (is.empty(src)) {
+                throw new Error('Missing previewThumbnails.src config attribute');
+            }
+
+            // If string, convert into single-element list
+            const urls = is.string(src) ? [src] : src;
+            // Loop through each src URL. Download and process the VTT file, storing the resulting data in this.thumbnails
+            const promises = urls.map(u => this.getThumbnail(u));
+
+            Promise.all(promises).then(() => {
+                // Sort smallest to biggest (e.g., [120p, 480p, 1080p])
+                this.thumbnails.sort((x, y) => x.height - y.height);
+
+                this.player.debug.log('Preview thumbnails', this.thumbnails);
+
+                resolve();
+            });
+        });
+    }
+
+    // Process individual VTT file
+    getThumbnail(url) {
+        return new Promise(resolve => {
+            fetch(url).then(response => {
+                const thumbnail = {
+                    frames: parseVtt(response),
+                    height: null,
+                    urlPrefix: '',
+                };
+
+                // If the URLs don't start with '/', then we need to set their relative path to be the location of the VTT file
+                // If the URLs do start with '/', then they obviously don't need a prefix, so it will remain blank
+                // If the thumbnail URLs start with with none of '/', 'http://' or 'https://', then we need to set their relative path to be the location of the VTT file
+                if (
+                    !thumbnail.frames[0].text.startsWith('/') &&
+                    !thumbnail.frames[0].text.startsWith('http://') &&
+                    !thumbnail.frames[0].text.startsWith('https://')
+                ) {
+                    thumbnail.urlPrefix = url.substring(0, url.lastIndexOf('/') + 1);
+                }
+
+                // Download the first frame, so that we can determine/set the height of this thumbnailsDef
+                const tempImage = new Image();
+
+                tempImage.onload = () => {
+                    thumbnail.height = tempImage.naturalHeight;
+                    thumbnail.width = tempImage.naturalWidth;
+
+                    this.thumbnails.push(thumbnail);
+
+                    resolve();
+                };
+
+                tempImage.src = thumbnail.urlPrefix + thumbnail.frames[0].text;
+            });
+        });
+    }
+
+    startMove(event) {
+        if (!this.loaded) {
+            return;
+        }
+
+        if (!is.event(event) || !['touchmove', 'mousemove'].includes(event.type)) {
+            return;
+        }
+
+        // Wait until media has a duration
+        if (!this.player.media.duration) {
+            return;
+        }
+
+        if (event.type === 'touchmove') {
+            // Calculate seek hover position as approx video seconds
+            this.seekTime = this.player.media.duration * (this.player.elements.inputs.seek.value / 100);
+        } else {
+            // Calculate seek hover position as approx video seconds
+            const clientRect = this.player.elements.progress.getBoundingClientRect();
+            const percentage = (100 / clientRect.width) * (event.pageX - clientRect.left);
+            this.seekTime = this.player.media.duration * (percentage / 100);
+
+            if (this.seekTime < 0) {
+                // The mousemove fires for 10+px out to the left
+                this.seekTime = 0;
+            }
+
+            if (this.seekTime > this.player.media.duration - 1) {
+                // Took 1 second off the duration for safety, because different players can disagree on the real duration of a video
+                this.seekTime = this.player.media.duration - 1;
+            }
+
+            this.mousePosX = event.pageX;
+
+            // Set time text inside image container
+            this.elements.thumb.time.innerText = formatTime(this.seekTime);
+        }
+
+        // Download and show image
+        this.showImageAtCurrentTime();
+    }
+
+    endMove() {
+        this.toggleThumbContainer(false, true);
+    }
+
+    startScrubbing(event) {
+        // Only act on left mouse button (0), or touch device (event.button does not exist or is false)
+        if (is.nullOrUndefined(event.button) || event.button === false || event.button === 0) {
+            this.mouseDown = true;
+
+            // Wait until media has a duration
+            if (this.player.media.duration) {
+                this.toggleScrubbingContainer(true);
+                this.toggleThumbContainer(false, true);
+
+                // Download and show image
+                this.showImageAtCurrentTime();
+            }
+        }
+    }
+
+    endScrubbing() {
+        this.mouseDown = false;
+
+        // Hide scrubbing preview. But wait until the video has successfully seeked before hiding the scrubbing preview
+        if (Math.ceil(this.lastTime) === Math.ceil(this.player.media.currentTime)) {
+            // The video was already seeked/loaded at the chosen time - hide immediately
+            this.toggleScrubbingContainer(false);
+        } else {
+            // The video hasn't seeked yet. Wait for that
+            once.call(this.player, this.player.media, 'timeupdate', () => {
+                // Re-check mousedown - we might have already started scrubbing again
+                if (!this.mouseDown) {
+                    this.toggleScrubbingContainer(false);
+                }
+            });
+        }
+    }
+
+    /**
+     * Setup hooks for Plyr and window events
+     */
+    listeners() {
+        // Hide thumbnail preview - on mouse click, mouse leave (in listeners.js for now), and video play/seek. All four are required, e.g., for buffering
+        this.player.on('play', () => {
+            this.toggleThumbContainer(false, true);
+        });
+
+        this.player.on('seeked', () => {
+            this.toggleThumbContainer(false);
+        });
+
+        this.player.on('timeupdate', () => {
+            this.lastTime = this.player.media.currentTime;
+        });
+    }
+
+    /**
+     * Create HTML elements for image containers
+     */
+    render() {
+        // Create HTML element: plyr__preview-thumbnail-container
+        this.elements.thumb.container = createElement('div', {
+            class: this.player.config.classNames.previewThumbnails.thumbContainer,
+        });
+
+        // Wrapper for the image for styling
+        this.elements.thumb.imageContainer = createElement('div', {
+            class: this.player.config.classNames.previewThumbnails.imageContainer,
+        });
+        this.elements.thumb.container.appendChild(this.elements.thumb.imageContainer);
+
+        // Create HTML element, parent+span: time text (e.g., 01:32:00)
+        const timeContainer = createElement('div', {
+            class: this.player.config.classNames.previewThumbnails.timeContainer,
+        });
+
+        this.elements.thumb.time = createElement('span', {}, '00:00');
+        timeContainer.appendChild(this.elements.thumb.time);
+
+        this.elements.thumb.container.appendChild(timeContainer);
+
+        // Inject the whole thumb
+        if (is.element(this.player.elements.progress)) {
+            this.player.elements.progress.appendChild(this.elements.thumb.container);
+        }
+
+        // Create HTML element: plyr__preview-scrubbing-container
+        this.elements.scrubbing.container = createElement('div', {
+            class: this.player.config.classNames.previewThumbnails.scrubbingContainer,
+        });
+
+        this.player.elements.wrapper.appendChild(this.elements.scrubbing.container);
+    }
+
+    destroy() {
+        if (this.elements.thumb.container) {
+            this.elements.thumb.container.remove();
+        }
+        if (this.elements.scrubbing.container) {
+            this.elements.scrubbing.container.remove();
+        }
+    }
+
+    showImageAtCurrentTime() {
+        if (this.mouseDown) {
+            this.setScrubbingContainerSize();
+        } else {
+            this.setThumbContainerSizeAndPos();
+        }
+
+        // Find the desired thumbnail index
+        // TODO: Handle a video longer than the thumbs where thumbNum is null
+        const thumbNum = this.thumbnails[0].frames.findIndex(
+            frame => this.seekTime >= frame.startTime && this.seekTime <= frame.endTime,
+        );
+        const hasThumb = thumbNum >= 0;
+        let qualityIndex = 0;
+
+        // Show the thumb container if we're not scrubbing
+        if (!this.mouseDown) {
+            this.toggleThumbContainer(hasThumb);
+        }
+
+        // No matching thumb found
+        if (!hasThumb) {
+            return;
+        }
+
+        // Check to see if we've already downloaded higher quality versions of this image
+        this.thumbnails.forEach((thumbnail, index) => {
+            if (this.loadedImages.includes(thumbnail.frames[thumbNum].text)) {
+                qualityIndex = index;
+            }
+        });
+
+        // Only proceed if either thumbnum or thumbfilename has changed
+        if (thumbNum !== this.showingThumb) {
+            this.showingThumb = thumbNum;
+            this.loadImage(qualityIndex);
+        }
+    }
+
+    // Show the image that's currently specified in this.showingThumb
+    loadImage(qualityIndex = 0) {
+        const thumbNum = this.showingThumb;
+        const thumbnail = this.thumbnails[qualityIndex];
+        const { urlPrefix } = thumbnail;
+        const frame = thumbnail.frames[thumbNum];
+        const thumbFilename = thumbnail.frames[thumbNum].text;
+        const thumbUrl = urlPrefix + thumbFilename;
+
+        if (!this.currentImageElement || this.currentImageElement.dataset.filename !== thumbFilename) {
+            // If we're already loading a previous image, remove its onload handler - we don't want it to load after this one
+            // Only do this if not using sprites. Without sprites we really want to show as many images as possible, as a best-effort
+            if (this.loadingImage && this.usingSprites) {
+                this.loadingImage.onload = null;
+            }
+
+            // We're building and adding a new image. In other implementations of similar functionality (YouTube), background image
+            // is instead used. But this causes issues with larger images in Firefox and Safari - switching between background
+            // images causes a flicker. Putting a new image over the top does not
+            const previewImage = new Image();
+            previewImage.src = thumbUrl;
+            previewImage.dataset.index = thumbNum;
+            previewImage.dataset.filename = thumbFilename;
+            this.showingThumbFilename = thumbFilename;
+
+            this.player.debug.log(`Loading image: ${thumbUrl}`);
+
+            // For some reason, passing the named function directly causes it to execute immediately. So I've wrapped it in an anonymous function...
+            previewImage.onload = () =>
+                this.showImage(previewImage, frame, qualityIndex, thumbNum, thumbFilename, true);
+            this.loadingImage = previewImage;
+            this.removeOldImages(previewImage);
+        } else {
+            // Update the existing image
+            this.showImage(this.currentImageElement, frame, qualityIndex, thumbNum, thumbFilename, false);
+            this.currentImageElement.dataset.index = thumbNum;
+            this.removeOldImages(this.currentImageElement);
+        }
+    }
+
+    showImage(previewImage, frame, qualityIndex, thumbNum, thumbFilename, newImage = true) {
+        this.player.debug.log(
+            `Showing thumb: ${thumbFilename}. num: ${thumbNum}. qual: ${qualityIndex}. newimg: ${newImage}`,
+        );
+        this.setImageSizeAndOffset(previewImage, frame);
+
+        if (newImage) {
+            this.currentImageContainer.appendChild(previewImage);
+            this.currentImageElement = previewImage;
+
+            if (!this.loadedImages.includes(thumbFilename)) {
+                this.loadedImages.push(thumbFilename);
+            }
+        }
+
+        // Preload images before and after the current one
+        // Show higher quality of the same frame
+        // Each step here has a short time delay, and only continues if still hovering/seeking the same spot. This is to protect slow connections from overloading
+        this.preloadNearby(thumbNum, true)
+            .then(this.preloadNearby(thumbNum, false))
+            .then(this.getHigherQuality(qualityIndex, previewImage, frame, thumbFilename));
+    }
+
+    // Remove all preview images that aren't the designated current image
+    removeOldImages(currentImage) {
+        // Get a list of all images, convert it from a DOM list to an array
+        Array.from(this.currentImageContainer.children).forEach(image => {
+            if (image.tagName.toLowerCase() !== 'img') {
+                return;
+            }
+
+            const removeDelay = this.usingSprites ? 500 : 1000;
+
+            if (image.dataset.index !== currentImage.dataset.index && !image.dataset.deleting) {
+                // Wait 200ms, as the new image can take some time to show on certain browsers (even though it was downloaded before showing). This will prevent flicker, and show some generosity towards slower clients
+                // First set attribute 'deleting' to prevent multi-handling of this on repeat firing of this function
+                // eslint-disable-next-line no-param-reassign
+                image.dataset.deleting = true;
+
+                // This has to be set before the timeout - to prevent issues switching between hover and scrub
+                const { currentImageContainer } = this;
+
+                setTimeout(() => {
+                    currentImageContainer.removeChild(image);
+                    this.player.debug.log(`Removing thumb: ${image.dataset.filename}`);
+                }, removeDelay);
+            }
+        });
+    }
+
+    // Preload images before and after the current one. Only if the user is still hovering/seeking the same frame
+    // This will only preload the lowest quality
+    preloadNearby(thumbNum, forward = true) {
+        return new Promise(resolve => {
+            setTimeout(() => {
+                const oldThumbFilename = this.thumbnails[0].frames[thumbNum].text;
+
+                if (this.showingThumbFilename === oldThumbFilename) {
+                    // Find the nearest thumbs with different filenames. Sometimes it'll be the next index, but in the case of sprites, it might be 100+ away
+                    let thumbnailsClone;
+                    if (forward) {
+                        thumbnailsClone = this.thumbnails[0].frames.slice(thumbNum);
+                    } else {
+                        thumbnailsClone = this.thumbnails[0].frames.slice(0, thumbNum).reverse();
+                    }
+
+                    let foundOne = false;
+
+                    thumbnailsClone.forEach(frame => {
+                        const newThumbFilename = frame.text;
+
+                        if (newThumbFilename !== oldThumbFilename) {
+                            // Found one with a different filename. Make sure it hasn't already been loaded on this page visit
+                            if (!this.loadedImages.includes(newThumbFilename)) {
+                                foundOne = true;
+                                this.player.debug.log(`Preloading thumb filename: ${newThumbFilename}`);
+
+                                const { urlPrefix } = this.thumbnails[0];
+                                const thumbURL = urlPrefix + newThumbFilename;
+                                const previewImage = new Image();
+                                previewImage.src = thumbURL;
+                                previewImage.onload = () => {
+                                    this.player.debug.log(`Preloaded thumb filename: ${newThumbFilename}`);
+                                    if (!this.loadedImages.includes(newThumbFilename))
+                                        this.loadedImages.push(newThumbFilename);
+
+                                    // We don't resolve until the thumb is loaded
+                                    resolve();
+                                };
+                            }
+                        }
+                    });
+
+                    // If there are none to preload then we want to resolve immediately
+                    if (!foundOne) {
+                        resolve();
+                    }
+                }
+            }, 300);
+        });
+    }
+
+    // If user has been hovering current image for half a second, look for a higher quality one
+    getHigherQuality(currentQualityIndex, previewImage, frame, thumbFilename) {
+        if (currentQualityIndex < this.thumbnails.length - 1) {
+            // Only use the higher quality version if it's going to look any better - if the current thumb is of a lower pixel density than the thumbnail container
+            let previewImageHeight = previewImage.naturalHeight;
+
+            if (this.usingSprites) {
+                previewImageHeight = frame.h;
+            }
+
+            if (previewImageHeight < this.thumbContainerHeight) {
+                // Recurse back to the loadImage function - show a higher quality one, but only if the viewer is on this frame for a while
+                setTimeout(() => {
+                    // Make sure the mouse hasn't already moved on and started hovering at another image
+                    if (this.showingThumbFilename === thumbFilename) {
+                        this.player.debug.log(`Showing higher quality thumb for: ${thumbFilename}`);
+                        this.loadImage(currentQualityIndex + 1);
+                    }
+                }, 300);
+            }
+        }
+    }
+
+    get currentImageContainer() {
+        if (this.mouseDown) {
+            return this.elements.scrubbing.container;
+        }
+
+        return this.elements.thumb.imageContainer;
+    }
+
+    get usingSprites() {
+        return Object.keys(this.thumbnails[0].frames[0]).includes('w');
+    }
+
+    get thumbAspectRatio() {
+        if (this.usingSprites) {
+            return this.thumbnails[0].frames[0].w / this.thumbnails[0].frames[0].h;
+        }
+
+        return this.thumbnails[0].width / this.thumbnails[0].height;
+    }
+
+    get thumbContainerHeight() {
+        if (this.mouseDown) {
+            const { height } = fitRatio(this.thumbAspectRatio, {
+                width: this.player.media.clientWidth,
+                height: this.player.media.clientHeight,
+            });
+            return height;
+        }
+
+        // If css is used this needs to return the css height for sprites to work (see setImageSizeAndOffset)
+        if (this.sizeSpecifiedInCSS) {
+            return this.elements.thumb.imageContainer.clientHeight;
+        }
+
+        return Math.floor(this.player.media.clientWidth / this.thumbAspectRatio / 4);
+    }
+
+    get currentImageElement() {
+        if (this.mouseDown) {
+            return this.currentScrubbingImageElement;
+        }
+
+        return this.currentThumbnailImageElement;
+    }
+
+    set currentImageElement(element) {
+        if (this.mouseDown) {
+            this.currentScrubbingImageElement = element;
+        } else {
+            this.currentThumbnailImageElement = element;
+        }
+    }
+
+    toggleThumbContainer(toggle = false, clearShowing = false) {
+        const className = this.player.config.classNames.previewThumbnails.thumbContainerShown;
+        this.elements.thumb.container.classList.toggle(className, toggle);
+
+        if (!toggle && clearShowing) {
+            this.showingThumb = null;
+            this.showingThumbFilename = null;
+        }
+    }
+
+    toggleScrubbingContainer(toggle = false) {
+        const className = this.player.config.classNames.previewThumbnails.scrubbingContainerShown;
+        this.elements.scrubbing.container.classList.toggle(className, toggle);
+
+        if (!toggle) {
+            this.showingThumb = null;
+            this.showingThumbFilename = null;
+        }
+    }
+
+    determineContainerAutoSizing() {
+        if (this.elements.thumb.imageContainer.clientHeight > 20 || this.elements.thumb.imageContainer.clientWidth > 20) {
+            // This will prevent auto sizing in this.setThumbContainerSizeAndPos()
+            this.sizeSpecifiedInCSS = true;
+        }
+    }
+
+    // Set the size to be about a quarter of the size of video. Unless option dynamicSize === false, in which case it needs to be set in CSS
+    setThumbContainerSizeAndPos() {
+        if (!this.sizeSpecifiedInCSS) {
+            const thumbWidth = Math.floor(this.thumbContainerHeight * this.thumbAspectRatio);
+            this.elements.thumb.imageContainer.style.height = `${this.thumbContainerHeight}px`;
+            this.elements.thumb.imageContainer.style.width = `${thumbWidth}px`;
+        } else if (this.elements.thumb.imageContainer.clientHeight > 20 && this.elements.thumb.imageContainer.clientWidth < 20) {
+            const thumbWidth = Math.floor(this.elements.thumb.imageContainer.clientHeight * this.thumbAspectRatio);
+            this.elements.thumb.imageContainer.style.width = `${thumbWidth}px`;
+        } else if (this.elements.thumb.imageContainer.clientHeight < 20 && this.elements.thumb.imageContainer.clientWidth > 20) {
+            const thumbHeight = Math.floor(this.elements.thumb.imageContainer.clientWidth / this.thumbAspectRatio);
+            this.elements.thumb.imageContainer.style.height = `${thumbHeight}px`;
+        }
+
+        this.setThumbContainerPos();
+    }
+
+    setThumbContainerPos() {
+        const seekbarRect = this.player.elements.progress.getBoundingClientRect();
+        const plyrRect = this.player.elements.container.getBoundingClientRect();
+        const { container } = this.elements.thumb;
+        // Find the lowest and highest desired left-position, so we don't slide out the side of the video container
+        const minVal = plyrRect.left - seekbarRect.left + 10;
+        const maxVal = plyrRect.right - seekbarRect.left - container.clientWidth - 10;
+        // Set preview container position to: mousepos, minus seekbar.left, minus half of previewContainer.clientWidth
+        let previewPos = this.mousePosX - seekbarRect.left - container.clientWidth / 2;
+
+        if (previewPos < minVal) {
+            previewPos = minVal;
+        }
+
+        if (previewPos > maxVal) {
+            previewPos = maxVal;
+        }
+
+        container.style.left = `${previewPos}px`;
+    }
+
+    // Can't use 100% width, in case the video is a different aspect ratio to the video container
+    setScrubbingContainerSize() {
+        const { width, height } = fitRatio(this.thumbAspectRatio, {
+            width: this.player.media.clientWidth,
+            height: this.player.media.clientHeight,
+        });
+        this.elements.scrubbing.container.style.width = `${width}px`;
+        this.elements.scrubbing.container.style.height = `${height}px`;
+    }
+
+    // Sprites need to be offset to the correct location
+    setImageSizeAndOffset(previewImage, frame) {
+        if (!this.usingSprites) {
+            return;
+        }
+
+        // Find difference between height and preview container height
+        const multiplier = this.thumbContainerHeight / frame.h;
+
+        // eslint-disable-next-line no-param-reassign
+        previewImage.style.height = `${previewImage.naturalHeight * multiplier}px`;
+        // eslint-disable-next-line no-param-reassign
+        previewImage.style.width = `${previewImage.naturalWidth * multiplier}px`;
+        // eslint-disable-next-line no-param-reassign
+        previewImage.style.left = `-${frame.x * multiplier}px`;
+        // eslint-disable-next-line no-param-reassign
+        previewImage.style.top = `-${frame.y * multiplier}px`;
+    }
+}
+
+export default PreviewThumbnails;

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/plugins/vimeo.js

@@ -0,0 +1,402 @@
+// ==========================================================================
+// Vimeo plugin
+// ==========================================================================
+
+import captions from '../captions';
+import controls from '../controls';
+import ui from '../ui';
+import { createElement, replaceElement, toggleClass } from '../utils/elements';
+import { triggerEvent } from '../utils/events';
+import fetch from '../utils/fetch';
+import is from '../utils/is';
+import loadScript from '../utils/load-script';
+import { extend } from '../utils/objects';
+import { format, stripHTML } from '../utils/strings';
+import { setAspectRatio } from '../utils/style';
+import { buildUrlParams } from '../utils/urls';
+
+// Parse Vimeo ID from URL
+function parseId(url) {
+    if (is.empty(url)) {
+        return null;
+    }
+
+    if (is.number(Number(url))) {
+        return url;
+    }
+
+    const regex = /^.*(vimeo.com\/|video\/)(\d+).*/;
+    return url.match(regex) ? RegExp.$2 : url;
+}
+
+// Set playback state and trigger change (only on actual change)
+function assurePlaybackState(play) {
+    if (play && !this.embed.hasPlayed) {
+        this.embed.hasPlayed = true;
+    }
+    if (this.media.paused === play) {
+        this.media.paused = !play;
+        triggerEvent.call(this, this.media, play ? 'play' : 'pause');
+    }
+}
+
+const vimeo = {
+    setup() {
+        const player = this;
+
+        // Add embed class for responsive
+        toggleClass(player.elements.wrapper, player.config.classNames.embed, true);
+
+        // Set speed options from config
+        player.options.speed = player.config.speed.options;
+
+        // Set intial ratio
+        setAspectRatio.call(player);
+
+        // Load the SDK if not already
+        if (!is.object(window.Vimeo)) {
+            loadScript(player.config.urls.vimeo.sdk)
+                .then(() => {
+                    vimeo.ready.call(player);
+                })
+                .catch(error => {
+                    player.debug.warn('Vimeo SDK (player.js) failed to load', error);
+                });
+        } else {
+            vimeo.ready.call(player);
+        }
+    },
+
+    // API Ready
+    ready() {
+        const player = this;
+        const config = player.config.vimeo;
+
+        // Get Vimeo params for the iframe
+        const params = buildUrlParams(
+            extend(
+                {},
+                {
+                    loop: player.config.loop.active,
+                    autoplay: player.autoplay,
+                    muted: player.muted,
+                    gesture: 'media',
+                    playsinline: !this.config.fullscreen.iosNative,
+                },
+                config,
+            ),
+        );
+
+        // Get the source URL or ID
+        let source = player.media.getAttribute('src');
+
+        // Get from <div> if needed
+        if (is.empty(source)) {
+            source = player.media.getAttribute(player.config.attributes.embed.id);
+        }
+
+        const id = parseId(source);
+        // Build an iframe
+        const iframe = createElement('iframe');
+        const src = format(player.config.urls.vimeo.iframe, id, params);
+        iframe.setAttribute('src', src);
+        iframe.setAttribute('allowfullscreen', '');
+        iframe.setAttribute('allowtransparency', '');
+        iframe.setAttribute('allow', 'autoplay');
+
+        // Set the referrer policy if required
+        if (!is.empty(config.referrerPolicy)) {
+            iframe.setAttribute('referrerPolicy', config.referrerPolicy);
+        }
+
+        // Get poster, if already set
+        const { poster } = player;
+        // Inject the package
+        const wrapper = createElement('div', { poster, class: player.config.classNames.embedContainer });
+        wrapper.appendChild(iframe);
+        player.media = replaceElement(wrapper, player.media);
+
+        // Get poster image
+        fetch(format(player.config.urls.vimeo.api, id), 'json').then(response => {
+            if (is.empty(response)) {
+                return;
+            }
+
+            // Get the URL for thumbnail
+            const url = new URL(response[0].thumbnail_large);
+
+            // Get original image
+            url.pathname = `${url.pathname.split('_')[0]}.jpg`;
+
+            // Set and show poster
+            ui.setPoster.call(player, url.href).catch(() => {});
+        });
+
+        // Setup instance
+        // https://github.com/vimeo/player.js
+        player.embed = new window.Vimeo.Player(iframe, {
+            autopause: player.config.autopause,
+            muted: player.muted,
+        });
+
+        player.media.paused = true;
+        player.media.currentTime = 0;
+
+        // Disable native text track rendering
+        if (player.supported.ui) {
+            player.embed.disableTextTrack();
+        }
+
+        // Create a faux HTML5 API using the Vimeo API
+        player.media.play = () => {
+            assurePlaybackState.call(player, true);
+            return player.embed.play();
+        };
+
+        player.media.pause = () => {
+            assurePlaybackState.call(player, false);
+            return player.embed.pause();
+        };
+
+        player.media.stop = () => {
+            player.pause();
+            player.currentTime = 0;
+        };
+
+        // Seeking
+        let { currentTime } = player.media;
+        Object.defineProperty(player.media, 'currentTime', {
+            get() {
+                return currentTime;
+            },
+            set(time) {
+                // Vimeo will automatically play on seek if the video hasn't been played before
+
+                // Get current paused state and volume etc
+                const { embed, media, paused, volume } = player;
+                const restorePause = paused && !embed.hasPlayed;
+
+                // Set seeking state and trigger event
+                media.seeking = true;
+                triggerEvent.call(player, media, 'seeking');
+
+                // If paused, mute until seek is complete
+                Promise.resolve(restorePause && embed.setVolume(0))
+                    // Seek
+                    .then(() => embed.setCurrentTime(time))
+                    // Restore paused
+                    .then(() => restorePause && embed.pause())
+                    // Restore volume
+                    .then(() => restorePause && embed.setVolume(volume))
+                    .catch(() => {
+                        // Do nothing
+                    });
+            },
+        });
+
+        // Playback speed
+        let speed = player.config.speed.selected;
+        Object.defineProperty(player.media, 'playbackRate', {
+            get() {
+                return speed;
+            },
+            set(input) {
+                player.embed.setPlaybackRate(input).then(() => {
+                    speed = input;
+                    triggerEvent.call(player, player.media, 'ratechange');
+                });
+            },
+        });
+
+        // Volume
+        let { volume } = player.config;
+        Object.defineProperty(player.media, 'volume', {
+            get() {
+                return volume;
+            },
+            set(input) {
+                player.embed.setVolume(input).then(() => {
+                    volume = input;
+                    triggerEvent.call(player, player.media, 'volumechange');
+                });
+            },
+        });
+
+        // Muted
+        let { muted } = player.config;
+        Object.defineProperty(player.media, 'muted', {
+            get() {
+                return muted;
+            },
+            set(input) {
+                const toggle = is.boolean(input) ? input : false;
+
+                player.embed.setVolume(toggle ? 0 : player.config.volume).then(() => {
+                    muted = toggle;
+                    triggerEvent.call(player, player.media, 'volumechange');
+                });
+            },
+        });
+
+        // Loop
+        let { loop } = player.config;
+        Object.defineProperty(player.media, 'loop', {
+            get() {
+                return loop;
+            },
+            set(input) {
+                const toggle = is.boolean(input) ? input : player.config.loop.active;
+
+                player.embed.setLoop(toggle).then(() => {
+                    loop = toggle;
+                });
+            },
+        });
+
+        // Source
+        let currentSrc;
+        player.embed
+            .getVideoUrl()
+            .then(value => {
+                currentSrc = value;
+                controls.setDownloadUrl.call(player);
+            })
+            .catch(error => {
+                this.debug.warn(error);
+            });
+
+        Object.defineProperty(player.media, 'currentSrc', {
+            get() {
+                return currentSrc;
+            },
+        });
+
+        // Ended
+        Object.defineProperty(player.media, 'ended', {
+            get() {
+                return player.currentTime === player.duration;
+            },
+        });
+
+        // Set aspect ratio based on video size
+        Promise.all([player.embed.getVideoWidth(), player.embed.getVideoHeight()]).then(dimensions => {
+            const [width, height] = dimensions;
+            player.embed.ratio = [width, height];
+            setAspectRatio.call(this);
+        });
+
+        // Set autopause
+        player.embed.setAutopause(player.config.autopause).then(state => {
+            player.config.autopause = state;
+        });
+
+        // Get title
+        player.embed.getVideoTitle().then(title => {
+            player.config.title = title;
+            ui.setTitle.call(this);
+        });
+
+        // Get current time
+        player.embed.getCurrentTime().then(value => {
+            currentTime = value;
+            triggerEvent.call(player, player.media, 'timeupdate');
+        });
+
+        // Get duration
+        player.embed.getDuration().then(value => {
+            player.media.duration = value;
+            triggerEvent.call(player, player.media, 'durationchange');
+        });
+
+        // Get captions
+        player.embed.getTextTracks().then(tracks => {
+            player.media.textTracks = tracks;
+            captions.setup.call(player);
+        });
+
+        player.embed.on('cuechange', ({ cues = [] }) => {
+            const strippedCues = cues.map(cue => stripHTML(cue.text));
+            captions.updateCues.call(player, strippedCues);
+        });
+
+        player.embed.on('loaded', () => {
+            // Assure state and events are updated on autoplay
+            player.embed.getPaused().then(paused => {
+                assurePlaybackState.call(player, !paused);
+                if (!paused) {
+                    triggerEvent.call(player, player.media, 'playing');
+                }
+            });
+
+            if (is.element(player.embed.element) && player.supported.ui) {
+                const frame = player.embed.element;
+
+                // Fix keyboard focus issues
+                // https://github.com/sampotts/plyr/issues/317
+                frame.setAttribute('tabindex', -1);
+            }
+        });
+
+        player.embed.on('bufferstart', () => {
+            triggerEvent.call(player, player.media, 'waiting');
+        });
+
+        player.embed.on('bufferend', () => {
+            triggerEvent.call(player, player.media, 'playing');
+        });
+
+        player.embed.on('play', () => {
+            assurePlaybackState.call(player, true);
+            triggerEvent.call(player, player.media, 'playing');
+        });
+
+        player.embed.on('pause', () => {
+            assurePlaybackState.call(player, false);
+        });
+
+        player.embed.on('timeupdate', data => {
+            player.media.seeking = false;
+            currentTime = data.seconds;
+            triggerEvent.call(player, player.media, 'timeupdate');
+        });
+
+        player.embed.on('progress', data => {
+            player.media.buffered = data.percent;
+            triggerEvent.call(player, player.media, 'progress');
+
+            // Check all loaded
+            if (parseInt(data.percent, 10) === 1) {
+                triggerEvent.call(player, player.media, 'canplaythrough');
+            }
+
+            // Get duration as if we do it before load, it gives an incorrect value
+            // https://github.com/sampotts/plyr/issues/891
+            player.embed.getDuration().then(value => {
+                if (value !== player.media.duration) {
+                    player.media.duration = value;
+                    triggerEvent.call(player, player.media, 'durationchange');
+                }
+            });
+        });
+
+        player.embed.on('seeked', () => {
+            player.media.seeking = false;
+            triggerEvent.call(player, player.media, 'seeked');
+        });
+
+        player.embed.on('ended', () => {
+            player.media.paused = true;
+            triggerEvent.call(player, player.media, 'ended');
+        });
+
+        player.embed.on('error', detail => {
+            player.media.error = detail;
+            triggerEvent.call(player, player.media, 'error');
+        });
+
+        // Rebuild UI
+        setTimeout(() => ui.build.call(player), 0);
+    },
+};
+
+export default vimeo;

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/plugins/youtube.js

@@ -0,0 +1,440 @@
+// ==========================================================================
+// YouTube plugin
+// ==========================================================================
+
+import ui from '../ui';
+import { createElement, replaceElement, toggleClass } from '../utils/elements';
+import { triggerEvent } from '../utils/events';
+import fetch from '../utils/fetch';
+import is from '../utils/is';
+import loadImage from '../utils/load-image';
+import loadScript from '../utils/load-script';
+import { extend } from '../utils/objects';
+import { format, generateId } from '../utils/strings';
+import { setAspectRatio } from '../utils/style';
+
+// Parse YouTube ID from URL
+function parseId(url) {
+    if (is.empty(url)) {
+        return null;
+    }
+
+    const regex = /^.*(youtu.be\/|v\/|u\/\w\/|embed\/|watch\?v=|&v=)([^#&?]*).*/;
+    return url.match(regex) ? RegExp.$2 : url;
+}
+
+// Set playback state and trigger change (only on actual change)
+function assurePlaybackState(play) {
+    if (play && !this.embed.hasPlayed) {
+        this.embed.hasPlayed = true;
+    }
+    if (this.media.paused === play) {
+        this.media.paused = !play;
+        triggerEvent.call(this, this.media, play ? 'play' : 'pause');
+    }
+}
+
+function getHost(config) {
+    if (config.noCookie) {
+        return 'https://www.youtube-nocookie.com';
+    }
+
+    if (window.location.protocol === 'http:') {
+        return 'http://www.youtube.com';
+    }
+
+    // Use YouTube's default
+    return undefined;
+}
+
+const youtube = {
+    setup() {
+        // Add embed class for responsive
+        toggleClass(this.elements.wrapper, this.config.classNames.embed, true);
+
+        // Setup API
+        if (is.object(window.YT) && is.function(window.YT.Player)) {
+            youtube.ready.call(this);
+        } else {
+            // Reference current global callback
+            const callback = window.onYouTubeIframeAPIReady;
+
+            // Set callback to process queue
+            window.onYouTubeIframeAPIReady = () => {
+                // Call global callback if set
+                if (is.function(callback)) {
+                    callback();
+                }
+
+                youtube.ready.call(this);
+            };
+
+            // Load the SDK
+            loadScript(this.config.urls.youtube.sdk).catch(error => {
+                this.debug.warn('YouTube API failed to load', error);
+            });
+        }
+    },
+
+    // Get the media title
+    getTitle(videoId) {
+        const url = format(this.config.urls.youtube.api, videoId);
+
+        fetch(url)
+            .then(data => {
+                if (is.object(data)) {
+                    const { title, height, width } = data;
+
+                    // Set title
+                    this.config.title = title;
+                    ui.setTitle.call(this);
+
+                    // Set aspect ratio
+                    this.embed.ratio = [width, height];
+                }
+
+                setAspectRatio.call(this);
+            })
+            .catch(() => {
+                // Set aspect ratio
+                setAspectRatio.call(this);
+            });
+    },
+
+    // API ready
+    ready() {
+        const player = this;
+        // Ignore already setup (race condition)
+        const currentId = player.media && player.media.getAttribute('id');
+        if (!is.empty(currentId) && currentId.startsWith('youtube-')) {
+            return;
+        }
+
+        // Get the source URL or ID
+        let source = player.media.getAttribute('src');
+
+        // Get from <div> if needed
+        if (is.empty(source)) {
+            source = player.media.getAttribute(this.config.attributes.embed.id);
+        }
+
+        // Replace the <iframe> with a <div> due to YouTube API issues
+        const videoId = parseId(source);
+        const id = generateId(player.provider);
+        // Get poster, if already set
+        const { poster } = player;
+        // Replace media element
+        const container = createElement('div', { id, poster });
+        player.media = replaceElement(container, player.media);
+
+        // Id to poster wrapper
+        const posterSrc = s => `https://i.ytimg.com/vi/${videoId}/${s}default.jpg`;
+
+        // Check thumbnail images in order of quality, but reject fallback thumbnails (120px wide)
+        loadImage(posterSrc('maxres'), 121) // Higest quality and unpadded
+            .catch(() => loadImage(posterSrc('sd'), 121)) // 480p padded 4:3
+            .catch(() => loadImage(posterSrc('hq'))) // 360p padded 4:3. Always exists
+            .then(image => ui.setPoster.call(player, image.src))
+            .then(src => {
+                // If the image is padded, use background-size "cover" instead (like youtube does too with their posters)
+                if (!src.includes('maxres')) {
+                    player.elements.poster.style.backgroundSize = 'cover';
+                }
+            })
+            .catch(() => {});
+
+        const config = player.config.youtube;
+
+        // Setup instance
+        // https://developers.google.com/youtube/iframe_api_reference
+        player.embed = new window.YT.Player(id, {
+            videoId,
+            host: getHost(config),
+            playerVars: extend(
+                {},
+                {
+                    autoplay: player.config.autoplay ? 1 : 0, // Autoplay
+                    hl: player.config.hl, // iframe interface language
+                    controls: player.supported.ui ? 0 : 1, // Only show controls if not fully supported
+                    disablekb: 1, // Disable keyboard as we handle it
+                    playsinline: !player.config.fullscreen.iosNative ? 1 : 0, // Allow iOS inline playback
+                    // Captions are flaky on YouTube
+                    cc_load_policy: player.captions.active ? 1 : 0,
+                    cc_lang_pref: player.config.captions.language,
+                    // Tracking for stats
+                    widget_referrer: window ? window.location.href : null,
+                },
+                config,
+            ),
+            events: {
+                onError(event) {
+                    // YouTube may fire onError twice, so only handle it once
+                    if (!player.media.error) {
+                        const code = event.data;
+                        // Messages copied from https://developers.google.com/youtube/iframe_api_reference#onError
+                        const message =
+                            {
+                                2: 'The request contains an invalid parameter value. For example, this error occurs if you specify a video ID that does not have 11 characters, or if the video ID contains invalid characters, such as exclamation points or asterisks.',
+                                5: 'The requested content cannot be played in an HTML5 player or another error related to the HTML5 player has occurred.',
+                                100: 'The video requested was not found. This error occurs when a video has been removed (for any reason) or has been marked as private.',
+                                101: 'The owner of the requested video does not allow it to be played in embedded players.',
+                                150: 'The owner of the requested video does not allow it to be played in embedded players.',
+                            }[code] || 'An unknown error occured';
+
+                        player.media.error = { code, message };
+
+                        triggerEvent.call(player, player.media, 'error');
+                    }
+                },
+                onPlaybackRateChange(event) {
+                    // Get the instance
+                    const instance = event.target;
+
+                    // Get current speed
+                    player.media.playbackRate = instance.getPlaybackRate();
+
+                    triggerEvent.call(player, player.media, 'ratechange');
+                },
+                onReady(event) {
+                    // Bail if onReady has already been called. See issue #1108
+                    if (is.function(player.media.play)) {
+                        return;
+                    }
+                    // Get the instance
+                    const instance = event.target;
+
+                    // Get the title
+                    youtube.getTitle.call(player, videoId);
+
+                    // Create a faux HTML5 API using the YouTube API
+                    player.media.play = () => {
+                        assurePlaybackState.call(player, true);
+                        instance.playVideo();
+                    };
+
+                    player.media.pause = () => {
+                        assurePlaybackState.call(player, false);
+                        instance.pauseVideo();
+                    };
+
+                    player.media.stop = () => {
+                        instance.stopVideo();
+                    };
+
+                    player.media.duration = instance.getDuration();
+                    player.media.paused = true;
+
+                    // Seeking
+                    player.media.currentTime = 0;
+                    Object.defineProperty(player.media, 'currentTime', {
+                        get() {
+                            return Number(instance.getCurrentTime());
+                        },
+                        set(time) {
+                            // If paused and never played, mute audio preventively (YouTube starts playing on seek if the video hasn't been played yet).
+                            if (player.paused && !player.embed.hasPlayed) {
+                                player.embed.mute();
+                            }
+
+                            // Set seeking state and trigger event
+                            player.media.seeking = true;
+                            triggerEvent.call(player, player.media, 'seeking');
+
+                            // Seek after events sent
+                            instance.seekTo(time);
+                        },
+                    });
+
+                    // Playback speed
+                    Object.defineProperty(player.media, 'playbackRate', {
+                        get() {
+                            return instance.getPlaybackRate();
+                        },
+                        set(input) {
+                            instance.setPlaybackRate(input);
+                        },
+                    });
+
+                    // Volume
+                    let { volume } = player.config;
+                    Object.defineProperty(player.media, 'volume', {
+                        get() {
+                            return volume;
+                        },
+                        set(input) {
+                            volume = input;
+                            instance.setVolume(volume * 100);
+                            triggerEvent.call(player, player.media, 'volumechange');
+                        },
+                    });
+
+                    // Muted
+                    let { muted } = player.config;
+                    Object.defineProperty(player.media, 'muted', {
+                        get() {
+                            return muted;
+                        },
+                        set(input) {
+                            const toggle = is.boolean(input) ? input : muted;
+                            muted = toggle;
+                            instance[toggle ? 'mute' : 'unMute']();
+                            triggerEvent.call(player, player.media, 'volumechange');
+                        },
+                    });
+
+                    // Source
+                    Object.defineProperty(player.media, 'currentSrc', {
+                        get() {
+                            return instance.getVideoUrl();
+                        },
+                    });
+
+                    // Ended
+                    Object.defineProperty(player.media, 'ended', {
+                        get() {
+                            return player.currentTime === player.duration;
+                        },
+                    });
+
+                    // Get available speeds
+                    const speeds = instance.getAvailablePlaybackRates();
+                    // Filter based on config
+                    player.options.speed = speeds.filter(s => player.config.speed.options.includes(s));
+
+                    // Set the tabindex to avoid focus entering iframe
+                    if (player.supported.ui) {
+                        player.media.setAttribute('tabindex', -1);
+                    }
+
+                    triggerEvent.call(player, player.media, 'timeupdate');
+                    triggerEvent.call(player, player.media, 'durationchange');
+
+                    // Reset timer
+                    clearInterval(player.timers.buffering);
+
+                    // Setup buffering
+                    player.timers.buffering = setInterval(() => {
+                        // Get loaded % from YouTube
+                        player.media.buffered = instance.getVideoLoadedFraction();
+
+                        // Trigger progress only when we actually buffer something
+                        if (player.media.lastBuffered === null || player.media.lastBuffered < player.media.buffered) {
+                            triggerEvent.call(player, player.media, 'progress');
+                        }
+
+                        // Set last buffer point
+                        player.media.lastBuffered = player.media.buffered;
+
+                        // Bail if we're at 100%
+                        if (player.media.buffered === 1) {
+                            clearInterval(player.timers.buffering);
+
+                            // Trigger event
+                            triggerEvent.call(player, player.media, 'canplaythrough');
+                        }
+                    }, 200);
+
+                    // Rebuild UI
+                    setTimeout(() => ui.build.call(player), 50);
+                },
+                onStateChange(event) {
+                    // Get the instance
+                    const instance = event.target;
+
+                    // Reset timer
+                    clearInterval(player.timers.playing);
+
+                    const seeked = player.media.seeking && [1, 2].includes(event.data);
+
+                    if (seeked) {
+                        // Unset seeking and fire seeked event
+                        player.media.seeking = false;
+                        triggerEvent.call(player, player.media, 'seeked');
+                    }
+
+                    // Handle events
+                    // -1   Unstarted
+                    // 0    Ended
+                    // 1    Playing
+                    // 2    Paused
+                    // 3    Buffering
+                    // 5    Video cued
+                    switch (event.data) {
+                        case -1:
+                            // Update scrubber
+                            triggerEvent.call(player, player.media, 'timeupdate');
+
+                            // Get loaded % from YouTube
+                            player.media.buffered = instance.getVideoLoadedFraction();
+                            triggerEvent.call(player, player.media, 'progress');
+
+                            break;
+
+                        case 0:
+                            assurePlaybackState.call(player, false);
+
+                            // YouTube doesn't support loop for a single video, so mimick it.
+                            if (player.media.loop) {
+                                // YouTube needs a call to `stopVideo` before playing again
+                                instance.stopVideo();
+                                instance.playVideo();
+                            } else {
+                                triggerEvent.call(player, player.media, 'ended');
+                            }
+
+                            break;
+
+                        case 1:
+                            // Restore paused state (YouTube starts playing on seek if the video hasn't been played yet)
+                            if (!player.config.autoplay && player.media.paused && !player.embed.hasPlayed) {
+                                player.media.pause();
+                            } else {
+                                assurePlaybackState.call(player, true);
+
+                                triggerEvent.call(player, player.media, 'playing');
+
+                                // Poll to get playback progress
+                                player.timers.playing = setInterval(() => {
+                                    triggerEvent.call(player, player.media, 'timeupdate');
+                                }, 50);
+
+                                // Check duration again due to YouTube bug
+                                // https://github.com/sampotts/plyr/issues/374
+                                // https://code.google.com/p/gdata-issues/issues/detail?id=8690
+                                if (player.media.duration !== instance.getDuration()) {
+                                    player.media.duration = instance.getDuration();
+                                    triggerEvent.call(player, player.media, 'durationchange');
+                                }
+                            }
+
+                            break;
+
+                        case 2:
+                            // Restore audio (YouTube starts playing on seek if the video hasn't been played yet)
+                            if (!player.muted) {
+                                player.embed.unMute();
+                            }
+                            assurePlaybackState.call(player, false);
+
+                            break;
+
+                        case 3:
+                            // Trigger waiting event to add loading classes to container as the video buffers.
+                            triggerEvent.call(player, player.media, 'waiting');
+
+                            break;
+
+                        default:
+                            break;
+                    }
+
+                    triggerEvent.call(player, player.elements.container, 'statechange', false, {
+                        code: event.data,
+                    });
+                },
+            },
+        });
+    },
+};
+
+export default youtube;

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/plyr.d.ts

@@ -0,0 +1,595 @@
+// Type definitions for plyr 3.5
+// Project: https://plyr.io
+// Definitions by: ondratra <https://github.com/ondratra>
+// TypeScript Version: 3.0
+
+export = Plyr;
+export as namespace Plyr;
+
+declare class Plyr {
+    /**
+     * Setup a new instance
+     */
+    static setup(targets: NodeList | HTMLElement | HTMLElement[] | string, options?: Plyr.Options): Plyr[];
+
+    /**
+     * Check for support
+     * @param mediaType
+     * @param provider
+     * @param playsInline Whether the player has the playsinline attribute (only applicable to iOS 10+)
+     */
+    static supported(mediaType?: Plyr.MediaType, provider?: Plyr.Provider, playsInline?: boolean): Plyr.Support;
+
+    constructor(targets: NodeList | HTMLElement | HTMLElement[] | string, options?: Plyr.Options);
+
+    /**
+     * Indicates if the current player is HTML5.
+     */
+    readonly isHTML5: boolean;
+
+    /**
+     * Indicates if the current player is an embedded player.
+     */
+    readonly isEmbed: boolean;
+
+    /**
+     * Indicates if the current player is playing.
+     */
+    readonly playing: boolean;
+
+    /**
+     * Indicates if the current player is paused.
+     */
+    readonly paused: boolean;
+
+    /**
+     * Indicates if the current player is stopped.
+     */
+    readonly stopped: boolean;
+
+    /**
+     * Indicates if the current player has finished playback.
+     */
+    readonly ended: boolean;
+
+    /**
+     * Returns a float between 0 and 1 indicating how much of the media is buffered
+     */
+    readonly buffered: number;
+
+    /**
+     * Gets or sets the currentTime for the player. The setter accepts a float in seconds.
+     */
+    currentTime: number;
+
+    /**
+     * Indicates if the current player is seeking.
+     */
+    readonly seeking: boolean;
+
+    /**
+     * Returns the duration for the current media.
+     */
+    readonly duration: number;
+
+    /**
+     * Gets or sets the volume for the player. The setter accepts a float between 0 and 1.
+     */
+    volume: number;
+
+    /**
+     * Gets or sets the muted state of the player. The setter accepts a boolean.
+     */
+    muted: boolean;
+
+    /**
+     * Indicates if the current media has an audio track.
+     */
+    readonly hasAudio: boolean;
+
+    /**
+     * Gets or sets the speed for the player. The setter accepts a value in the options specified in your config. Generally the minimum should be 0.5.
+     */
+    speed: number;
+
+    /**
+     * Gets or sets the quality for the player. The setter accepts a value from the options specified in your config.
+     * Remarks: YouTube only. HTML5 will follow.
+     */
+    quality: string;
+
+    /**
+     * Gets or sets the current loop state of the player.
+     */
+    loop: boolean;
+
+    /**
+     * Gets or sets the current source for the player.
+     */
+    source: Plyr.SourceInfo;
+
+    /**
+     * Gets or sets the current poster image URL for the player.
+     */
+    poster: string;
+
+    /**
+     * Gets or sets the autoplay state of the player.
+     */
+    autoplay: boolean;
+
+    /**
+     * Gets or sets the caption track by index. 1 means the track is missing or captions is not active
+     */
+    currentTrack: number;
+
+    /**
+     * Gets or sets the preferred captions language for the player. The setter accepts an ISO twoletter language code. Support for the languages is dependent on the captions you include.
+     * If your captions don't have any language data, or if you have multiple tracks with the same language, you may want to use currentTrack instead.
+     */
+    language: string;
+
+    /**
+     * Gets or sets the picture-in-picture state of the player. This currently only supported on Safari 10+ on MacOS Sierra+ and iOS 10+.
+     */
+    pip: boolean;
+
+    readonly fullscreen: Plyr.FullscreenControl;
+
+    /**
+     * Start playback.
+     * For HTML5 players, play() will return a Promise in some browsers - WebKit and Mozilla according to MDN at time of writing.
+     */
+    play(): Promise<void> | void;
+
+    /**
+     * Pause playback.
+     */
+    pause(): void;
+
+    /**
+     * Toggle playback, if no parameters are passed, it will toggle based on current status.
+     */
+    togglePlay(toggle?: boolean): boolean;
+
+    /**
+     * Stop playback and reset to start.
+     */
+    stop(): void;
+
+    /**
+     * Restart playback.
+     */
+    restart(): void;
+
+    /**
+     * Rewind playback by the specified seek time. If no parameter is passed, the default seek time will be used.
+     */
+    rewind(seekTime?: number): void;
+
+    /**
+     * Fast forward by the specified seek time. If no parameter is passed, the default seek time will be used.
+     */
+    forward(seekTime?: number): void;
+
+    /**
+     * Increase volume by the specified step. If no parameter is passed, the default step will be used.
+     */
+    increaseVolume(step?: number): void;
+
+    /**
+     * Increase volume by the specified step. If no parameter is passed, the default step will be used.
+     */
+    decreaseVolume(step?: number): void;
+
+    /**
+     * Toggle captions display. If no parameter is passed, it will toggle based on current status.
+     */
+    toggleCaptions(toggle?: boolean): void;
+
+    /**
+     * Trigger the airplay dialog on supported devices.
+     */
+    airplay(): void;
+
+    /**
+     * Toggle the controls (video only). Takes optional truthy value to force it on/off.
+     */
+    toggleControls(toggle: boolean): void;
+
+    /**
+     * Add an event listener for the specified event.
+     */
+    on(
+        event: Plyr.StandardEvent | Plyr.Html5Event | Plyr.YoutubeEvent,
+        callback: (this: this, event: Plyr.PlyrEvent) => void,
+    ): void;
+
+    /**
+     * Add an event listener for the specified event once.
+     */
+    once(
+        event: Plyr.StandardEvent | Plyr.Html5Event | Plyr.YoutubeEvent,
+        callback: (this: this, event: Plyr.PlyrEvent) => void,
+    ): void;
+
+    /**
+     * Remove an event listener for the specified event.
+     */
+    off(
+        event: Plyr.StandardEvent | Plyr.Html5Event | Plyr.YoutubeEvent,
+        callback: (this: this, event: Plyr.PlyrEvent) => void,
+    ): void;
+
+    /**
+     * Check support for a mime type.
+     */
+    supports(type: string): boolean;
+
+    /**
+     * Destroy lib instance
+     */
+    destroy(): void;
+}
+
+declare namespace Plyr {
+    type MediaType = 'audio' | 'video';
+    type Provider = 'html5' | 'youtube' | 'vimeo';
+    type StandardEvent =
+        | 'progress'
+        | 'playing'
+        | 'play'
+        | 'pause'
+        | 'timeupdate'
+        | 'volumechange'
+        | 'seeking'
+        | 'seeked'
+        | 'ratechange'
+        | 'ended'
+        | 'enterfullscreen'
+        | 'exitfullscreen'
+        | 'captionsenabled'
+        | 'captionsdisabled'
+        | 'languagechange'
+        | 'controlshidden'
+        | 'controlsshown'
+        | 'ready';
+    type Html5Event =
+        | 'loadstart'
+        | 'loadeddata'
+        | 'loadedmetadata'
+        | 'canplay'
+        | 'canplaythrough'
+        | 'stalled'
+        | 'waiting'
+        | 'emptied'
+        | 'cuechange'
+        | 'error';
+    type YoutubeEvent = 'statechange' | 'qualitychange' | 'qualityrequested';
+
+    interface FullscreenControl {
+        /**
+         * Indicates if the current player is in fullscreen mode.
+         */
+        readonly active: boolean;
+
+        /**
+         * Indicates if the current player has fullscreen enabled.
+         */
+        readonly enabled: boolean;
+
+        /**
+         * Enter fullscreen. If fullscreen is not supported, a fallback ""full window/viewport"" is used instead.
+         */
+        enter(): void;
+
+        /**
+         * Exit fullscreen.
+         */
+        exit(): void;
+
+        /**
+         * Toggle fullscreen.
+         */
+        toggle(): void;
+    }
+
+    interface Options {
+        /**
+         * Completely disable Plyr. This would allow you to do a User Agent check or similar to programmatically enable or disable Plyr for a certain UA. Example below.
+         */
+        enabled?: boolean;
+
+        /**
+         * Display debugging information in the console
+         */
+        debug?: boolean;
+
+        /**
+         * If a function is passed, it is assumed your method will return either an element or HTML string for the controls. Three arguments will be passed to your function;
+         * id (the unique id for the player), seektime (the seektime step in seconds), and title (the media title). See controls.md for more info on how the html needs to be structured.
+         * Defaults to ['play-large', 'play', 'progress', 'current-time', 'mute', 'volume', 'captions', 'settings', 'pip', 'airplay', 'fullscreen']
+         */
+        controls?: string[] | ((id: string, seektime: number, title: string) => unknown) | Element;
+
+        /**
+         * If you're using the default controls are used then you can specify which settings to show in the menu
+         * Defaults to ['captions', 'quality', 'speed', 'loop']
+         */
+        settings?: string[];
+
+        /**
+         * Used for internationalization (i18n) of the text within the UI.
+         */
+        i18n?: any;
+
+        /**
+         * Load the SVG sprite specified as the iconUrl option (if a URL). If false, it is assumed you are handling sprite loading yourself.
+         */
+        loadSprite?: boolean;
+
+        /**
+         * Specify a URL or path to the SVG sprite. See the SVG section for more info.
+         */
+        iconUrl?: string;
+
+        /**
+         * Specify the id prefix for the icons used in the default controls (e.g. plyr-play would be plyr).
+         * This is to prevent clashes if you're using your own SVG sprite but with the default controls.
+         * Most people can ignore this option.
+         */
+        iconPrefix?: string;
+
+        /**
+         * Specify a URL or path to a blank video file used to properly cancel network requests.
+         */
+        blankUrl?: string;
+
+        /**
+         * Autoplay the media on load. This is generally advised against on UX grounds. It is also disabled by default in some browsers.
+         * If the autoplay attribute is present on a <video> or <audio> element, this will be automatically set to true.
+         */
+        autoplay?: boolean;
+
+        /**
+         * Only allow one player playing at once.
+         */
+        autopause?: boolean;
+
+        /**
+         * The time, in seconds, to seek when a user hits fast forward or rewind.
+         */
+        seekTime?: number;
+
+        /**
+         * A number, between 0 and 1, representing the initial volume of the player.
+         */
+        volume?: number;
+
+        /**
+         * Whether to start playback muted. If the muted attribute is present on a <video> or <audio> element, this will be automatically set to true.
+         */
+        muted?: boolean;
+
+        /**
+         * Click (or tap) of the video container will toggle play/pause.
+         */
+        clickToPlay?: boolean;
+
+        /**
+         * Disable right click menu on video to help as very primitive obfuscation to prevent downloads of content.
+         */
+        disableContextMenu?: boolean;
+
+        /**
+         * Hide video controls automatically after 2s of no mouse or focus movement, on control element blur (tab out), on playback start or entering fullscreen.
+         * As soon as the mouse is moved, a control element is focused or playback is paused, the controls reappear instantly.
+         */
+        hideControls?: boolean;
+
+        /**
+         * Reset the playback to the start once playback is complete.
+         */
+        resetOnEnd?: boolean;
+
+        /**
+         * Enable keyboard shortcuts for focused players only or globally
+         */
+        keyboard?: KeyboardOptions;
+
+        /**
+         * controls: Display control labels as tooltips on :hover & :focus (by default, the labels are screen reader only).
+         * seek: Display a seek tooltip to indicate on click where the media would seek to.
+         */
+        tooltips?: TooltipOptions;
+
+        /**
+         * Specify a custom duration for media.
+         */
+        duration?: number;
+
+        /**
+         * Displays the duration of the media on the metadataloaded event (on startup) in the current time display.
+         * This will only work if the preload attribute is not set to none (or is not set at all) and you choose not to display the duration (see controls option).
+         */
+        displayDuration?: boolean;
+
+        /**
+         * Display the current time as a countdown rather than an incremental counter.
+         */
+        invertTime?: boolean;
+
+        /**
+         * Allow users to click to toggle the above.
+         */
+        toggleInvert?: boolean;
+
+        /**
+         * Allows binding of event listeners to the controls before the default handlers. See the defaults.js for available listeners.
+         * If your handler prevents default on the event (event.preventDefault()), the default handler will not fire.
+         */
+        listeners?: { [key: string]: (error: PlyrEvent) => void };
+
+        /**
+         * active: Toggles if captions should be active by default. language: Sets the default language to load (if available). 'auto' uses the browser language.
+         * update: Listen to changes to tracks and update menu. This is needed for some streaming libraries, but can result in unselectable language options).
+         */
+        captions?: CaptionOptions;
+
+        /**
+         * enabled: Toggles whether fullscreen should be enabled. fallback: Allow fallback to a full-window solution.
+         * iosNative: whether to use native iOS fullscreen when entering fullscreen (no custom controls)
+         */
+        fullscreen?: FullScreenOptions;
+
+        /**
+         * The aspect ratio you want to use for embedded players.
+         */
+        ratio?: string;
+
+        /**
+         * enabled: Allow use of local storage to store user settings. key: The key name to use.
+         */
+        storage?: StorageOptions;
+
+        /**
+         * selected: The default speed for playback. options: The speed options to display in the UI. YouTube and Vimeo will ignore any options outside of the 0.5-2 range, so options outside of this range will be hidden automatically.
+         */
+        speed?: SpeedOptions;
+
+        /**
+         * Currently only supported by YouTube. default is the default quality level, determined by YouTube. options are the options to display.
+         */
+        quality?: QualityOptions;
+
+        /**
+         * active: Whether to loop the current video. If the loop attribute is present on a <video> or <audio> element,
+         * this will be automatically set to true This is an object to support future functionality.
+         */
+        loop?: LoopOptions;
+
+        /**
+         * enabled: Whether to enable vi.ai ads. publisherId: Your unique vi.ai publisher ID.
+         */
+        ads?: AdOptions;
+    }
+
+    interface QualityOptions {
+        default: string;
+        options: string[];
+    }
+
+    interface LoopOptions {
+        active: boolean;
+    }
+
+    interface AdOptions {
+        enabled: boolean;
+        publisherId: string;
+    }
+
+    interface SpeedOptions {
+        selected: number;
+        options: number[];
+    }
+
+    interface KeyboardOptions {
+        focused?: boolean;
+        global?: boolean;
+    }
+
+    interface TooltipOptions {
+        controls?: boolean;
+        seek?: boolean;
+    }
+
+    interface FullScreenOptions {
+        enabled?: boolean;
+        fallback?: boolean;
+        allowAudio?: boolean;
+    }
+
+    interface CaptionOptions {
+        active?: boolean;
+        language?: string;
+        update?: boolean;
+    }
+
+    interface StorageOptions {
+        enabled?: boolean;
+        key?: string;
+    }
+
+    interface SourceInfo {
+        /**
+         * Note: YouTube and Vimeo are currently not supported as audio sources.
+         */
+        type: MediaType;
+
+        /**
+         * Title of the new media. Used for the aria-label attribute on the play button, and outer container. YouTube and Vimeo are populated automatically.
+         */
+        title?: string;
+
+        /**
+         * This is an array of sources. For HTML5 media, the properties of this object are mapped directly to HTML attributes so more can be added to the object if required.
+         */
+        sources: Source[];
+
+        /**
+         * The URL for the poster image (HTML5 video only).
+         */
+        poster?: string;
+
+        /**
+         * An array of track objects. Each element in the array is mapped directly to a track element and any keys mapped directly to HTML attributes so as in the example above,
+         * it will render as <track kind="captions" label="English" srclang="en" src="https://cdn.selz.com/plyr/1.0/example_captions_en.vtt" default> and similar for the French version.
+         * Booleans are converted to HTML5 value-less attributes.
+         */
+        tracks?: Track[];
+    }
+
+    interface Source {
+        /**
+         * The URL of the media file (or YouTube/Vimeo URL).
+         */
+        src: string;
+        /**
+         * The MIME type of the media file (if HTML5).
+         */
+        type?: string;
+        provider?: Provider;
+        size?: number;
+    }
+
+    type TrackKind = 'subtitles' | 'captions' | 'descriptions' | 'chapters' | 'metadata';
+    interface Track {
+        /**
+         * Indicates how the text track is meant to be used
+         */
+        kind: TrackKind;
+        /**
+         * Indicates a user-readable title for the track
+         */
+        label: string;
+        /**
+         * The language of the track text data. It must be a valid BCP 47 language tag. If the kind attribute is set to subtitles, then srclang must be defined.
+         */
+        srcLang?: string;
+        /**
+         * The URL of the track (.vtt file).
+         */
+        src: string;
+
+        default?: boolean;
+    }
+
+    interface PlyrEvent extends CustomEvent {
+        readonly detail: { readonly plyr: Plyr };
+    }
+
+    interface Support {
+        api: boolean;
+        ui: boolean;
+    }
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/plyr.polyfilled.js

@@ -0,0 +1,13 @@
+// ==========================================================================
+// Plyr Polyfilled Build
+// plyr.js v3.5.10
+// https://github.com/sampotts/plyr
+// License: The MIT License (MIT)
+// ==========================================================================
+
+import 'custom-event-polyfill';
+import 'url-polyfill';
+
+import Plyr from './plyr';
+
+export default Plyr;

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/source.js

@@ -0,0 +1,158 @@
+// ==========================================================================
+// Plyr source update
+// ==========================================================================
+
+import { providers } from './config/types';
+import html5 from './html5';
+import media from './media';
+import PreviewThumbnails from './plugins/preview-thumbnails';
+import support from './support';
+import ui from './ui';
+import { createElement, insertElement, removeElement } from './utils/elements';
+import is from './utils/is';
+import { getDeep } from './utils/objects';
+
+const source = {
+    // Add elements to HTML5 media (source, tracks, etc)
+    insertElements(type, attributes) {
+        if (is.string(attributes)) {
+            insertElement(type, this.media, {
+                src: attributes,
+            });
+        } else if (is.array(attributes)) {
+            attributes.forEach(attribute => {
+                insertElement(type, this.media, attribute);
+            });
+        }
+    },
+
+    // Update source
+    // Sources are not checked for support so be careful
+    change(input) {
+        if (!getDeep(input, 'sources.length')) {
+            this.debug.warn('Invalid source format');
+            return;
+        }
+
+        // Cancel current network requests
+        html5.cancelRequests.call(this);
+
+        // Destroy instance and re-setup
+        this.destroy.call(
+            this,
+            () => {
+                // Reset quality options
+                this.options.quality = [];
+
+                // Remove elements
+                removeElement(this.media);
+                this.media = null;
+
+                // Reset class name
+                if (is.element(this.elements.container)) {
+                    this.elements.container.removeAttribute('class');
+                }
+
+                // Set the type and provider
+                const { sources, type } = input;
+                const [{ provider = providers.html5, src }] = sources;
+                const tagName = provider === 'html5' ? type : 'div';
+                const attributes = provider === 'html5' ? {} : { src };
+
+                Object.assign(this, {
+                    provider,
+                    type,
+                    // Check for support
+                    supported: support.check(type, provider, this.config.playsinline),
+                    // Create new element
+                    media: createElement(tagName, attributes),
+                });
+
+                // Inject the new element
+                this.elements.container.appendChild(this.media);
+
+                // Autoplay the new source?
+                if (is.boolean(input.autoplay)) {
+                    this.config.autoplay = input.autoplay;
+                }
+
+                // Set attributes for audio and video
+                if (this.isHTML5) {
+                    if (this.config.crossorigin) {
+                        this.media.setAttribute('crossorigin', '');
+                    }
+                    if (this.config.autoplay) {
+                        this.media.setAttribute('autoplay', '');
+                    }
+                    if (!is.empty(input.poster)) {
+                        this.poster = input.poster;
+                    }
+                    if (this.config.loop.active) {
+                        this.media.setAttribute('loop', '');
+                    }
+                    if (this.config.muted) {
+                        this.media.setAttribute('muted', '');
+                    }
+                    if (this.config.playsinline) {
+                        this.media.setAttribute('playsinline', '');
+                    }
+                }
+
+                // Restore class hook
+                ui.addStyleHook.call(this);
+
+                // Set new sources for html5
+                if (this.isHTML5) {
+                    source.insertElements.call(this, 'source', sources);
+                }
+
+                // Set video title
+                this.config.title = input.title;
+
+                // Set up from scratch
+                media.setup.call(this);
+
+                // HTML5 stuff
+                if (this.isHTML5) {
+                    // Setup captions
+                    if (Object.keys(input).includes('tracks')) {
+                        source.insertElements.call(this, 'track', input.tracks);
+                    }
+                }
+
+                // If HTML5 or embed but not fully supported, setupInterface and call ready now
+                if (this.isHTML5 || (this.isEmbed && !this.supported.ui)) {
+                    // Setup interface
+                    ui.build.call(this);
+                }
+
+                // Load HTML5 sources
+                if (this.isHTML5) {
+                    this.media.load();
+                }
+
+                // Update previewThumbnails config & reload plugin
+                if (!is.empty(input.previewThumbnails)) {
+                    Object.assign(this.config.previewThumbnails, input.previewThumbnails);
+
+                    // Cleanup previewThumbnails plugin if it was loaded
+                    if (this.previewThumbnails && this.previewThumbnails.loaded) {
+                        this.previewThumbnails.destroy();
+                        this.previewThumbnails = null;
+                    }
+
+                    // Create new instance if it is still enabled
+                    if (this.config.previewThumbnails.enabled) {
+                        this.previewThumbnails = new PreviewThumbnails(this);
+                    }
+                }
+
+                // Update the fullscreen support
+                this.fullscreen.update();
+            },
+            true,
+        );
+    },
+};
+
+export default source;

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/storage.js

@@ -0,0 +1,77 @@
+// ==========================================================================
+// Plyr storage
+// ==========================================================================
+
+import is from './utils/is';
+import { extend } from './utils/objects';
+
+class Storage {
+    constructor(player) {
+        this.enabled = player.config.storage.enabled;
+        this.key = player.config.storage.key;
+    }
+
+    // Check for actual support (see if we can use it)
+    static get supported() {
+        try {
+            if (!('localStorage' in window)) {
+                return false;
+            }
+
+            const test = '___test';
+
+            // Try to use it (it might be disabled, e.g. user is in private mode)
+            // see: https://github.com/sampotts/plyr/issues/131
+            window.localStorage.setItem(test, test);
+            window.localStorage.removeItem(test);
+
+            return true;
+        } catch (e) {
+            return false;
+        }
+    }
+
+    get(key) {
+        if (!Storage.supported || !this.enabled) {
+            return null;
+        }
+
+        const store = window.localStorage.getItem(this.key);
+
+        if (is.empty(store)) {
+            return null;
+        }
+
+        const json = JSON.parse(store);
+
+        return is.string(key) && key.length ? json[key] : json;
+    }
+
+    set(object) {
+        // Bail if we don't have localStorage support or it's disabled
+        if (!Storage.supported || !this.enabled) {
+            return;
+        }
+
+        // Can only store objectst
+        if (!is.object(object)) {
+            return;
+        }
+
+        // Get current storage
+        let storage = this.get();
+
+        // Default to empty object
+        if (is.empty(storage)) {
+            storage = {};
+        }
+
+        // Update the working copy of the values
+        extend(storage, object);
+
+        // Update storage
+        window.localStorage.setItem(this.key, JSON.stringify(storage));
+    }
+}
+
+export default Storage;

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/support.js

@@ -0,0 +1,118 @@
+// ==========================================================================
+// Plyr support checks
+// ==========================================================================
+
+import { transitionEndEvent } from './utils/animation';
+import browser from './utils/browser';
+import { createElement } from './utils/elements';
+import is from './utils/is';
+
+// Default codecs for checking mimetype support
+const defaultCodecs = {
+    'audio/ogg': 'vorbis',
+    'audio/wav': '1',
+    'video/webm': 'vp8, vorbis',
+    'video/mp4': 'avc1.42E01E, mp4a.40.2',
+    'video/ogg': 'theora',
+};
+
+// Check for feature support
+const support = {
+    // Basic support
+    audio: 'canPlayType' in document.createElement('audio'),
+    video: 'canPlayType' in document.createElement('video'),
+
+    // Check for support
+    // Basic functionality vs full UI
+    check(type, provider, playsinline) {
+        const canPlayInline = browser.isIPhone && playsinline && support.playsinline;
+        const api = support[type] || provider !== 'html5';
+        const ui = api && support.rangeInput && (type !== 'video' || !browser.isIPhone || canPlayInline);
+
+        return {
+            api,
+            ui,
+        };
+    },
+
+    // Picture-in-picture support
+    // Safari & Chrome only currently
+    pip: (() => {
+        if (browser.isIPhone) {
+            return false;
+        }
+
+        // Safari
+        // https://developer.apple.com/documentation/webkitjs/adding_picture_in_picture_to_your_safari_media_controls
+        if (is.function(createElement('video').webkitSetPresentationMode)) {
+            return true;
+        }
+
+        // Chrome
+        // https://developers.google.com/web/updates/2018/10/watch-video-using-picture-in-picture
+        if (document.pictureInPictureEnabled && !createElement('video').disablePictureInPicture) {
+            return true;
+        }
+
+        return false;
+    })(),
+
+    // Airplay support
+    // Safari only currently
+    airplay: is.function(window.WebKitPlaybackTargetAvailabilityEvent),
+
+    // Inline playback support
+    // https://webkit.org/blog/6784/new-video-policies-for-ios/
+    playsinline: 'playsInline' in document.createElement('video'),
+
+    // Check for mime type support against a player instance
+    // Credits: http://diveintohtml5.info/everything.html
+    // Related: http://www.leanbackplayer.com/test/h5mt.html
+    mime(input) {
+        if (is.empty(input)) {
+            return false;
+        }
+
+        const [mediaType] = input.split('/');
+        let type = input;
+
+        // Verify we're using HTML5 and there's no media type mismatch
+        if (!this.isHTML5 || mediaType !== this.type) {
+            return false;
+        }
+
+        // Add codec if required
+        if (Object.keys(defaultCodecs).includes(type)) {
+            type += `; codecs="${defaultCodecs[input]}"`;
+        }
+
+        try {
+            return Boolean(type && this.media.canPlayType(type).replace(/no/, ''));
+        } catch (e) {
+            return false;
+        }
+    },
+
+    // Check for textTracks support
+    textTracks: 'textTracks' in document.createElement('video'),
+
+    // <input type="range"> Sliders
+    rangeInput: (() => {
+        const range = document.createElement('input');
+        range.type = 'range';
+        return range.type === 'range';
+    })(),
+
+    // Touch
+    // NOTE: Remember a device can be mouse + touch enabled so we check on first touch event
+    touch: 'ontouchstart' in document.documentElement,
+
+    // Detect transitions support
+    transitions: transitionEndEvent !== false,
+
+    // Reduced motion iOS & MacOS setting
+    // https://webkit.org/blog/7551/responsive-design-for-motion/
+    reducedMotion: 'matchMedia' in window && window.matchMedia('(prefers-reduced-motion)').matches,
+};
+
+export default support;

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/ui.js

@@ -0,0 +1,279 @@
+// ==========================================================================
+// Plyr UI
+// ==========================================================================
+
+import captions from './captions';
+import controls from './controls';
+import support from './support';
+import browser from './utils/browser';
+import { getElement, toggleClass } from './utils/elements';
+import { ready, triggerEvent } from './utils/events';
+import i18n from './utils/i18n';
+import is from './utils/is';
+import loadImage from './utils/load-image';
+
+const ui = {
+    addStyleHook() {
+        toggleClass(this.elements.container, this.config.selectors.container.replace('.', ''), true);
+        toggleClass(this.elements.container, this.config.classNames.uiSupported, this.supported.ui);
+    },
+
+    // Toggle native HTML5 media controls
+    toggleNativeControls(toggle = false) {
+        if (toggle && this.isHTML5) {
+            this.media.setAttribute('controls', '');
+        } else {
+            this.media.removeAttribute('controls');
+        }
+    },
+
+    // Setup the UI
+    build() {
+        // Re-attach media element listeners
+        // TODO: Use event bubbling?
+        this.listeners.media();
+
+        // Don't setup interface if no support
+        if (!this.supported.ui) {
+            this.debug.warn(`Basic support only for ${this.provider} ${this.type}`);
+
+            // Restore native controls
+            ui.toggleNativeControls.call(this, true);
+
+            // Bail
+            return;
+        }
+
+        // Inject custom controls if not present
+        if (!is.element(this.elements.controls)) {
+            // Inject custom controls
+            controls.inject.call(this);
+
+            // Re-attach control listeners
+            this.listeners.controls();
+        }
+
+        // Remove native controls
+        ui.toggleNativeControls.call(this);
+
+        // Setup captions for HTML5
+        if (this.isHTML5) {
+            captions.setup.call(this);
+        }
+
+        // Reset volume
+        this.volume = null;
+
+        // Reset mute state
+        this.muted = null;
+
+        // Reset loop state
+        this.loop = null;
+
+        // Reset quality setting
+        this.quality = null;
+
+        // Reset speed
+        this.speed = null;
+
+        // Reset volume display
+        controls.updateVolume.call(this);
+
+        // Reset time display
+        controls.timeUpdate.call(this);
+
+        // Update the UI
+        ui.checkPlaying.call(this);
+
+        // Check for picture-in-picture support
+        toggleClass(
+            this.elements.container,
+            this.config.classNames.pip.supported,
+            support.pip && this.isHTML5 && this.isVideo,
+        );
+
+        // Check for airplay support
+        toggleClass(this.elements.container, this.config.classNames.airplay.supported, support.airplay && this.isHTML5);
+
+        // Add iOS class
+        toggleClass(this.elements.container, this.config.classNames.isIos, browser.isIos);
+
+        // Add touch class
+        toggleClass(this.elements.container, this.config.classNames.isTouch, this.touch);
+
+        // Ready for API calls
+        this.ready = true;
+
+        // Ready event at end of execution stack
+        setTimeout(() => {
+            triggerEvent.call(this, this.media, 'ready');
+        }, 0);
+
+        // Set the title
+        ui.setTitle.call(this);
+
+        // Assure the poster image is set, if the property was added before the element was created
+        if (this.poster) {
+            ui.setPoster.call(this, this.poster, false).catch(() => {});
+        }
+
+        // Manually set the duration if user has overridden it.
+        // The event listeners for it doesn't get called if preload is disabled (#701)
+        if (this.config.duration) {
+            controls.durationUpdate.call(this);
+        }
+    },
+
+    // Setup aria attribute for play and iframe title
+    setTitle() {
+        // Find the current text
+        let label = i18n.get('play', this.config);
+
+        // If there's a media title set, use that for the label
+        if (is.string(this.config.title) && !is.empty(this.config.title)) {
+            label += `, ${this.config.title}`;
+        }
+
+        // If there's a play button, set label
+        Array.from(this.elements.buttons.play || []).forEach(button => {
+            button.setAttribute('aria-label', label);
+        });
+
+        // Set iframe title
+        // https://github.com/sampotts/plyr/issues/124
+        if (this.isEmbed) {
+            const iframe = getElement.call(this, 'iframe');
+
+            if (!is.element(iframe)) {
+                return;
+            }
+
+            // Default to media type
+            const title = !is.empty(this.config.title) ? this.config.title : 'video';
+            const format = i18n.get('frameTitle', this.config);
+
+            iframe.setAttribute('title', format.replace('{title}', title));
+        }
+    },
+
+    // Toggle poster
+    togglePoster(enable) {
+        toggleClass(this.elements.container, this.config.classNames.posterEnabled, enable);
+    },
+
+    // Set the poster image (async)
+    // Used internally for the poster setter, with the passive option forced to false
+    setPoster(poster, passive = true) {
+        // Don't override if call is passive
+        if (passive && this.poster) {
+            return Promise.reject(new Error('Poster already set'));
+        }
+
+        // Set property synchronously to respect the call order
+        this.media.setAttribute('poster', poster);
+
+        // HTML5 uses native poster attribute
+        if (this.isHTML5) {
+            return Promise.resolve(poster);
+        }
+
+        // Wait until ui is ready
+        return (
+            ready
+                .call(this)
+                // Load image
+                .then(() => loadImage(poster))
+                .catch(err => {
+                    // Hide poster on error unless it's been set by another call
+                    if (poster === this.poster) {
+                        ui.togglePoster.call(this, false);
+                    }
+                    // Rethrow
+                    throw err;
+                })
+                .then(() => {
+                    // Prevent race conditions
+                    if (poster !== this.poster) {
+                        throw new Error('setPoster cancelled by later call to setPoster');
+                    }
+                })
+                .then(() => {
+                    Object.assign(this.elements.poster.style, {
+                        backgroundImage: `url('${poster}')`,
+                        // Reset backgroundSize as well (since it can be set to "cover" for padded thumbnails for youtube)
+                        backgroundSize: '',
+                    });
+
+                    ui.togglePoster.call(this, true);
+
+                    return poster;
+                })
+        );
+    },
+
+    // Check playing state
+    checkPlaying(event) {
+        // Class hooks
+        toggleClass(this.elements.container, this.config.classNames.playing, this.playing);
+        toggleClass(this.elements.container, this.config.classNames.paused, this.paused);
+        toggleClass(this.elements.container, this.config.classNames.stopped, this.stopped);
+
+        // Set state
+        Array.from(this.elements.buttons.play || []).forEach(target => {
+            Object.assign(target, { pressed: this.playing });
+            target.setAttribute('aria-label', i18n.get(this.playing ? 'pause' : 'play', this.config));
+        });
+
+        // Only update controls on non timeupdate events
+        if (is.event(event) && event.type === 'timeupdate') {
+            return;
+        }
+
+        // Toggle controls
+        ui.toggleControls.call(this);
+    },
+
+    // Check if media is loading
+    checkLoading(event) {
+        this.loading = ['stalled', 'waiting'].includes(event.type);
+
+        // Clear timer
+        clearTimeout(this.timers.loading);
+
+        // Timer to prevent flicker when seeking
+        this.timers.loading = setTimeout(
+            () => {
+                // Update progress bar loading class state
+                toggleClass(this.elements.container, this.config.classNames.loading, this.loading);
+
+                // Update controls visibility
+                ui.toggleControls.call(this);
+            },
+            this.loading ? 250 : 0,
+        );
+    },
+
+    // Toggle controls based on state and `force` argument
+    toggleControls(force) {
+        const { controls: controlsElement } = this.elements;
+
+        if (controlsElement && this.config.hideControls) {
+            // Don't hide controls if a touch-device user recently seeked. (Must be limited to touch devices, or it occasionally prevents desktop controls from hiding.)
+            const recentTouchSeek = this.touch && this.lastSeekTime + 2000 > Date.now();
+
+            // Show controls if force, loading, paused, button interaction, or recent seek, otherwise hide
+            this.toggleControls(
+                Boolean(
+                    force ||
+                        this.loading ||
+                        this.paused ||
+                        controlsElement.pressed ||
+                        controlsElement.hover ||
+                        recentTouchSeek,
+                ),
+            );
+        }
+    },
+};
+
+export default ui;

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/utils/animation.js

@@ -0,0 +1,38 @@
+// ==========================================================================
+// Animation utils
+// ==========================================================================
+
+import is from './is';
+
+export const transitionEndEvent = (() => {
+    const element = document.createElement('span');
+
+    const events = {
+        WebkitTransition: 'webkitTransitionEnd',
+        MozTransition: 'transitionend',
+        OTransition: 'oTransitionEnd otransitionend',
+        transition: 'transitionend',
+    };
+
+    const type = Object.keys(events).find(event => element.style[event] !== undefined);
+
+    return is.string(type) ? events[type] : false;
+})();
+
+// Force repaint of element
+export function repaint(element, delay) {
+    setTimeout(() => {
+        try {
+            // eslint-disable-next-line no-param-reassign
+            element.hidden = true;
+
+            // eslint-disable-next-line no-unused-expressions
+            element.offsetHeight;
+
+            // eslint-disable-next-line no-param-reassign
+            element.hidden = false;
+        } catch (e) {
+            // Do nothing
+        }
+    }, delay);
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/utils/arrays.js

@@ -0,0 +1,23 @@
+// ==========================================================================
+// Array utils
+// ==========================================================================
+
+import is from './is';
+
+// Remove duplicates in an array
+export function dedupe(array) {
+    if (!is.array(array)) {
+        return array;
+    }
+
+    return array.filter((item, index) => array.indexOf(item) === index);
+}
+
+// Get the closest value in an array
+export function closest(array, value) {
+    if (!is.array(array) || !array.length) {
+        return null;
+    }
+
+    return array.reduce((prev, curr) => (Math.abs(curr - value) < Math.abs(prev - value) ? curr : prev));
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/utils/browser.js

@@ -0,0 +1,14 @@
+// ==========================================================================
+// Browser sniffing
+// Unfortunately, due to mixed support, UA sniffing is required
+// ==========================================================================
+
+const browser = {
+    isIE: /* @cc_on!@ */ false || !!document.documentMode,
+    isEdge: window.navigator.userAgent.includes('Edge'),
+    isWebkit: 'WebkitAppearance' in document.documentElement.style && !/Edge/.test(navigator.userAgent),
+    isIPhone: /(iPhone|iPod)/gi.test(navigator.platform),
+    isIos: /(iPad|iPhone|iPod)/gi.test(navigator.platform),
+};
+
+export default browser;

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/utils/elements.js

@@ -0,0 +1,263 @@
+// ==========================================================================
+// Element utils
+// ==========================================================================
+
+import is from './is';
+import { extend } from './objects';
+
+// Wrap an element
+export function wrap(elements, wrapper) {
+    // Convert `elements` to an array, if necessary.
+    const targets = elements.length ? elements : [elements];
+
+    // Loops backwards to prevent having to clone the wrapper on the
+    // first element (see `child` below).
+    Array.from(targets)
+        .reverse()
+        .forEach((element, index) => {
+            const child = index > 0 ? wrapper.cloneNode(true) : wrapper;
+            // Cache the current parent and sibling.
+            const parent = element.parentNode;
+            const sibling = element.nextSibling;
+
+            // Wrap the element (is automatically removed from its current
+            // parent).
+            child.appendChild(element);
+
+            // If the element had a sibling, insert the wrapper before
+            // the sibling to maintain the HTML structure; otherwise, just
+            // append it to the parent.
+            if (sibling) {
+                parent.insertBefore(child, sibling);
+            } else {
+                parent.appendChild(child);
+            }
+        });
+}
+
+// Set attributes
+export function setAttributes(element, attributes) {
+    if (!is.element(element) || is.empty(attributes)) {
+        return;
+    }
+
+    // Assume null and undefined attributes should be left out,
+    // Setting them would otherwise convert them to "null" and "undefined"
+    Object.entries(attributes)
+        .filter(([, value]) => !is.nullOrUndefined(value))
+        .forEach(([key, value]) => element.setAttribute(key, value));
+}
+
+// Create a DocumentFragment
+export function createElement(type, attributes, text) {
+    // Create a new <element>
+    const element = document.createElement(type);
+
+    // Set all passed attributes
+    if (is.object(attributes)) {
+        setAttributes(element, attributes);
+    }
+
+    // Add text node
+    if (is.string(text)) {
+        element.innerText = text;
+    }
+
+    // Return built element
+    return element;
+}
+
+// Inaert an element after another
+export function insertAfter(element, target) {
+    if (!is.element(element) || !is.element(target)) {
+        return;
+    }
+
+    target.parentNode.insertBefore(element, target.nextSibling);
+}
+
+// Insert a DocumentFragment
+export function insertElement(type, parent, attributes, text) {
+    if (!is.element(parent)) {
+        return;
+    }
+
+    parent.appendChild(createElement(type, attributes, text));
+}
+
+// Remove element(s)
+export function removeElement(element) {
+    if (is.nodeList(element) || is.array(element)) {
+        Array.from(element).forEach(removeElement);
+        return;
+    }
+
+    if (!is.element(element) || !is.element(element.parentNode)) {
+        return;
+    }
+
+    element.parentNode.removeChild(element);
+}
+
+// Remove all child elements
+export function emptyElement(element) {
+    if (!is.element(element)) {
+        return;
+    }
+
+    let { length } = element.childNodes;
+
+    while (length > 0) {
+        element.removeChild(element.lastChild);
+        length -= 1;
+    }
+}
+
+// Replace element
+export function replaceElement(newChild, oldChild) {
+    if (!is.element(oldChild) || !is.element(oldChild.parentNode) || !is.element(newChild)) {
+        return null;
+    }
+
+    oldChild.parentNode.replaceChild(newChild, oldChild);
+
+    return newChild;
+}
+
+// Get an attribute object from a string selector
+export function getAttributesFromSelector(sel, existingAttributes) {
+    // For example:
+    // '.test' to { class: 'test' }
+    // '#test' to { id: 'test' }
+    // '[data-test="test"]' to { 'data-test': 'test' }
+
+    if (!is.string(sel) || is.empty(sel)) {
+        return {};
+    }
+
+    const attributes = {};
+    const existing = extend({}, existingAttributes);
+
+    sel.split(',').forEach(s => {
+        // Remove whitespace
+        const selector = s.trim();
+        const className = selector.replace('.', '');
+        const stripped = selector.replace(/[[\]]/g, '');
+        // Get the parts and value
+        const parts = stripped.split('=');
+        const [key] = parts;
+        const value = parts.length > 1 ? parts[1].replace(/["']/g, '') : '';
+        // Get the first character
+        const start = selector.charAt(0);
+
+        switch (start) {
+            case '.':
+                // Add to existing classname
+                if (is.string(existing.class)) {
+                    attributes.class = `${existing.class} ${className}`;
+                } else {
+                    attributes.class = className;
+                }
+                break;
+
+            case '#':
+                // ID selector
+                attributes.id = selector.replace('#', '');
+                break;
+
+            case '[':
+                // Attribute selector
+                attributes[key] = value;
+
+                break;
+
+            default:
+                break;
+        }
+    });
+
+    return extend(existing, attributes);
+}
+
+// Toggle hidden
+export function toggleHidden(element, hidden) {
+    if (!is.element(element)) {
+        return;
+    }
+
+    let hide = hidden;
+
+    if (!is.boolean(hide)) {
+        hide = !element.hidden;
+    }
+
+    // eslint-disable-next-line no-param-reassign
+    element.hidden = hide;
+}
+
+// Mirror Element.classList.toggle, with IE compatibility for "force" argument
+export function toggleClass(element, className, force) {
+    if (is.nodeList(element)) {
+        return Array.from(element).map(e => toggleClass(e, className, force));
+    }
+
+    if (is.element(element)) {
+        let method = 'toggle';
+        if (typeof force !== 'undefined') {
+            method = force ? 'add' : 'remove';
+        }
+
+        element.classList[method](className);
+        return element.classList.contains(className);
+    }
+
+    return false;
+}
+
+// Has class name
+export function hasClass(element, className) {
+    return is.element(element) && element.classList.contains(className);
+}
+
+// Element matches selector
+export function matches(element, selector) {
+    const prototype = { Element };
+
+    function match() {
+        return Array.from(document.querySelectorAll(selector)).includes(this);
+    }
+
+    const method =
+        prototype.matches ||
+        prototype.webkitMatchesSelector ||
+        prototype.mozMatchesSelector ||
+        prototype.msMatchesSelector ||
+        match;
+
+    return method.call(element, selector);
+}
+
+// Find all elements
+export function getElements(selector) {
+    return this.elements.container.querySelectorAll(selector);
+}
+
+// Find a single element
+export function getElement(selector) {
+    return this.elements.container.querySelector(selector);
+}
+
+// Set focus and tab focus class
+export function setFocus(element = null, tabFocus = false) {
+    if (!is.element(element)) {
+        return;
+    }
+
+    // Set regular focus
+    element.focus({ preventScroll: true });
+
+    // If we want to mimic keyboard focus via tab
+    if (tabFocus) {
+        toggleClass(element, this.config.classNames.tabFocus);
+    }
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/utils/events.js

@@ -0,0 +1,117 @@
+// ==========================================================================
+// Event utils
+// ==========================================================================
+
+import is from './is';
+
+// Check for passive event listener support
+// https://github.com/WICG/EventListenerOptions/blob/gh-pages/explainer.md
+// https://www.youtube.com/watch?v=NPM6172J22g
+const supportsPassiveListeners = (() => {
+    // Test via a getter in the options object to see if the passive property is accessed
+    let supported = false;
+    try {
+        const options = Object.defineProperty({}, 'passive', {
+            get() {
+                supported = true;
+                return null;
+            },
+        });
+        window.addEventListener('test', null, options);
+        window.removeEventListener('test', null, options);
+    } catch (e) {
+        // Do nothing
+    }
+
+    return supported;
+})();
+
+// Toggle event listener
+export function toggleListener(element, event, callback, toggle = false, passive = true, capture = false) {
+    // Bail if no element, event, or callback
+    if (!element || !('addEventListener' in element) || is.empty(event) || !is.function(callback)) {
+        return;
+    }
+
+    // Allow multiple events
+    const events = event.split(' ');
+    // Build options
+    // Default to just the capture boolean for browsers with no passive listener support
+    let options = capture;
+
+    // If passive events listeners are supported
+    if (supportsPassiveListeners) {
+        options = {
+            // Whether the listener can be passive (i.e. default never prevented)
+            passive,
+            // Whether the listener is a capturing listener or not
+            capture,
+        };
+    }
+
+    // If a single node is passed, bind the event listener
+    events.forEach(type => {
+        if (this && this.eventListeners && toggle) {
+            // Cache event listener
+            this.eventListeners.push({ element, type, callback, options });
+        }
+
+        element[toggle ? 'addEventListener' : 'removeEventListener'](type, callback, options);
+    });
+}
+
+// Bind event handler
+export function on(element, events = '', callback, passive = true, capture = false) {
+    toggleListener.call(this, element, events, callback, true, passive, capture);
+}
+
+// Unbind event handler
+export function off(element, events = '', callback, passive = true, capture = false) {
+    toggleListener.call(this, element, events, callback, false, passive, capture);
+}
+
+// Bind once-only event handler
+export function once(element, events = '', callback, passive = true, capture = false) {
+    const onceCallback = (...args) => {
+        off(element, events, onceCallback, passive, capture);
+        callback.apply(this, args);
+    };
+
+    toggleListener.call(this, element, events, onceCallback, true, passive, capture);
+}
+
+// Trigger event
+export function triggerEvent(element, type = '', bubbles = false, detail = {}) {
+    // Bail if no element
+    if (!is.element(element) || is.empty(type)) {
+        return;
+    }
+
+    // Create and dispatch the event
+    const event = new CustomEvent(type, {
+        bubbles,
+        detail: { ...detail, plyr: this,},
+    });
+
+    // Dispatch the event
+    element.dispatchEvent(event);
+}
+
+// Unbind all cached event listeners
+export function unbindListeners() {
+    if (this && this.eventListeners) {
+        this.eventListeners.forEach(item => {
+            const { element, type, callback, options } = item;
+            element.removeEventListener(type, callback, options);
+        });
+
+        this.eventListeners = [];
+    }
+}
+
+// Run method when / if player is ready
+export function ready() {
+    return new Promise(resolve =>
+        this.ready ? setTimeout(resolve, 0) : on.call(this, this.elements.container, 'ready', resolve),
+    ).then(() => {});
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/utils/fetch.js

@@ -0,0 +1,42 @@
+// ==========================================================================
+// Fetch wrapper
+// Using XHR to avoid issues with older browsers
+// ==========================================================================
+
+export default function fetch(url, responseType = 'text') {
+    return new Promise((resolve, reject) => {
+        try {
+            const request = new XMLHttpRequest();
+
+            // Check for CORS support
+            if (!('withCredentials' in request)) {
+                return;
+            }
+
+            request.addEventListener('load', () => {
+                if (responseType === 'text') {
+                    try {
+                        resolve(JSON.parse(request.responseText));
+                    } catch (e) {
+                        resolve(request.responseText);
+                    }
+                } else {
+                    resolve(request.response);
+                }
+            });
+
+            request.addEventListener('error', () => {
+                throw new Error(request.status);
+            });
+
+            request.open('GET', url, true);
+
+            // Set the required response type
+            request.responseType = responseType;
+
+            request.send();
+        } catch (e) {
+            reject(e);
+        }
+    });
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/utils/i18n.js

@@ -0,0 +1,47 @@
+// ==========================================================================
+// Plyr internationalization
+// ==========================================================================
+
+import is from './is';
+import { getDeep } from './objects';
+import { replaceAll } from './strings';
+
+// Skip i18n for abbreviations and brand names
+const resources = {
+    pip: 'PIP',
+    airplay: 'AirPlay',
+    html5: 'HTML5',
+    vimeo: 'Vimeo',
+    youtube: 'YouTube',
+};
+
+const i18n = {
+    get(key = '', config = {}) {
+        if (is.empty(key) || is.empty(config)) {
+            return '';
+        }
+
+        let string = getDeep(config.i18n, key);
+
+        if (is.empty(string)) {
+            if (Object.keys(resources).includes(key)) {
+                return resources[key];
+            }
+
+            return '';
+        }
+
+        const replace = {
+            '{seektime}': config.seekTime,
+            '{title}': config.title,
+        };
+
+        Object.entries(replace).forEach(([k, v]) => {
+            string = replaceAll(string, k, v);
+        });
+
+        return string;
+    },
+};
+
+export default i18n;

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/utils/is.js

@@ -0,0 +1,72 @@
+// ==========================================================================
+// Type checking utils
+// ==========================================================================
+
+const getConstructor = input => (input !== null && typeof input !== 'undefined' ? input.constructor : null);
+const instanceOf = (input, constructor) => Boolean(input && constructor && input instanceof constructor);
+const isNullOrUndefined = input => input === null || typeof input === 'undefined';
+const isObject = input => getConstructor(input) === Object;
+const isNumber = input => getConstructor(input) === Number && !Number.isNaN(input);
+const isString = input => getConstructor(input) === String;
+const isBoolean = input => getConstructor(input) === Boolean;
+const isFunction = input => getConstructor(input) === Function;
+const isArray = input => Array.isArray(input);
+const isWeakMap = input => instanceOf(input, WeakMap);
+const isNodeList = input => instanceOf(input, NodeList);
+const isElement = input => instanceOf(input, Element);
+const isTextNode = input => getConstructor(input) === Text;
+const isEvent = input => instanceOf(input, Event);
+const isKeyboardEvent = input => instanceOf(input, KeyboardEvent);
+const isCue = input => instanceOf(input, window.TextTrackCue) || instanceOf(input, window.VTTCue);
+const isTrack = input => instanceOf(input, TextTrack) || (!isNullOrUndefined(input) && isString(input.kind));
+const isPromise = input => instanceOf(input, Promise);
+
+const isEmpty = input =>
+    isNullOrUndefined(input) ||
+    ((isString(input) || isArray(input) || isNodeList(input)) && !input.length) ||
+    (isObject(input) && !Object.keys(input).length);
+
+const isUrl = input => {
+    // Accept a URL object
+    if (instanceOf(input, window.URL)) {
+        return true;
+    }
+
+    // Must be string from here
+    if (!isString(input)) {
+        return false;
+    }
+
+    // Add the protocol if required
+    let string = input;
+    if (!input.startsWith('http://') || !input.startsWith('https://')) {
+        string = `http://${input}`;
+    }
+
+    try {
+        return !isEmpty(new URL(string).hostname);
+    } catch (e) {
+        return false;
+    }
+};
+
+export default {
+    nullOrUndefined: isNullOrUndefined,
+    object: isObject,
+    number: isNumber,
+    string: isString,
+    boolean: isBoolean,
+    function: isFunction,
+    array: isArray,
+    weakMap: isWeakMap,
+    nodeList: isNodeList,
+    element: isElement,
+    textNode: isTextNode,
+    event: isEvent,
+    keyboardEvent: isKeyboardEvent,
+    cue: isCue,
+    track: isTrack,
+    promise: isPromise,
+    url: isUrl,
+    empty: isEmpty,
+};

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/utils/load-image.js

@@ -0,0 +1,19 @@
+// ==========================================================================
+// Load image avoiding xhr/fetch CORS issues
+// Server status can't be obtained this way unfortunately, so this uses "naturalWidth" to determine if the image has loaded
+// By default it checks if it is at least 1px, but you can add a second argument to change this
+// ==========================================================================
+
+export default function loadImage(src, minWidth = 1) {
+    return new Promise((resolve, reject) => {
+        const image = new Image();
+
+        const handler = () => {
+            delete image.onload;
+            delete image.onerror;
+            (image.naturalWidth >= minWidth ? resolve : reject)(image);
+        };
+
+        Object.assign(image, { onload: handler, onerror: handler, src });
+    });
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/utils/load-script.js

@@ -0,0 +1,14 @@
+// ==========================================================================
+// Load an external script
+// ==========================================================================
+
+import loadjs from 'loadjs';
+
+export default function loadScript(url) {
+    return new Promise((resolve, reject) => {
+        loadjs(url, {
+            success: resolve,
+            error: reject,
+        });
+    });
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/utils/load-sprite.js

@@ -0,0 +1,75 @@
+// ==========================================================================
+// Sprite loader
+// ==========================================================================
+
+import Storage from '../storage';
+import fetch from './fetch';
+import is from './is';
+
+// Load an external SVG sprite
+export default function loadSprite(url, id) {
+    if (!is.string(url)) {
+        return;
+    }
+
+    const prefix = 'cache';
+    const hasId = is.string(id);
+    let isCached = false;
+    const exists = () => document.getElementById(id) !== null;
+
+    const update = (container, data) => {
+        // eslint-disable-next-line no-param-reassign
+        container.innerHTML = data;
+
+        // Check again incase of race condition
+        if (hasId && exists()) {
+            return;
+        }
+
+        // Inject the SVG to the body
+        document.body.insertAdjacentElement('afterbegin', container);
+    };
+
+    // Only load once if ID set
+    if (!hasId || !exists()) {
+        const useStorage = Storage.supported;
+        // Create container
+        const container = document.createElement('div');
+        container.setAttribute('hidden', '');
+
+        if (hasId) {
+            container.setAttribute('id', id);
+        }
+
+        // Check in cache
+        if (useStorage) {
+            const cached = window.localStorage.getItem(`${prefix}-${id}`);
+            isCached = cached !== null;
+
+            if (isCached) {
+                const data = JSON.parse(cached);
+                update(container, data.content);
+            }
+        }
+
+        // Get the sprite
+        fetch(url)
+            .then(result => {
+                if (is.empty(result)) {
+                    return;
+                }
+
+                if (useStorage) {
+                    window.localStorage.setItem(
+                        `${prefix}-${id}`,
+                        JSON.stringify({
+                            content: result,
+                        }),
+                    );
+                }
+
+                update(container, result);
+            })
+            .catch(() => {});
+    }
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/utils/numbers.js

@@ -0,0 +1,17 @@
+/**
+ * Returns a number whose value is limited to the given range.
+ *
+ * Example: limit the output of this computation to between 0 and 255
+ * (x * 255).clamp(0, 255)
+ *
+ * @param {Number} input
+ * @param {Number} min The lower boundary of the output range
+ * @param {Number} max The upper boundary of the output range
+ * @returns A number in the range [min, max]
+ * @type Number
+ */
+export function clamp(input = 0, min = 0, max = 255) {
+    return Math.min(Math.max(input, min), max);
+}
+
+export default { clamp };

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/utils/objects.js

@@ -0,0 +1,42 @@
+// ==========================================================================
+// Object utils
+// ==========================================================================
+
+import is from './is';
+
+// Clone nested objects
+export function cloneDeep(object) {
+    return JSON.parse(JSON.stringify(object));
+}
+
+// Get a nested value in an object
+export function getDeep(object, path) {
+    return path.split('.').reduce((obj, key) => obj && obj[key], object);
+}
+
+// Deep extend destination object with N more objects
+export function extend(target = {}, ...sources) {
+    if (!sources.length) {
+        return target;
+    }
+
+    const source = sources.shift();
+
+    if (!is.object(source)) {
+        return target;
+    }
+
+    Object.keys(source).forEach(key => {
+        if (is.object(source[key])) {
+            if (!Object.keys(target).includes(key)) {
+                Object.assign(target, { [key]: {} });
+            }
+
+            extend(target[key], source[key]);
+        } else {
+            Object.assign(target, { [key]: source[key] });
+        }
+    });
+
+    return extend(target, ...sources);
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/utils/strings.js

@@ -0,0 +1,85 @@
+// ==========================================================================
+// String utils
+// ==========================================================================
+
+import is from './is';
+
+// Generate a random ID
+export function generateId(prefix) {
+    return `${prefix}-${Math.floor(Math.random() * 10000)}`;
+}
+
+// Format string
+export function format(input, ...args) {
+    if (is.empty(input)) {
+        return input;
+    }
+
+    return input.toString().replace(/{(\d+)}/g, (match, i) => args[i].toString());
+}
+
+// Get percentage
+export function getPercentage(current, max) {
+    if (current === 0 || max === 0 || Number.isNaN(current) || Number.isNaN(max)) {
+        return 0;
+    }
+
+    return ((current / max) * 100).toFixed(2);
+}
+
+// Replace all occurances of a string in a string
+export function replaceAll(input = '', find = '', replace = '') {
+    return input.replace(
+        new RegExp(find.toString().replace(/([.*+?^=!:${}()|[\]/\\])/g, '\\$1'), 'g'),
+        replace.toString(),
+    );
+}
+
+// Convert to title case
+export function toTitleCase(input = '') {
+    return input.toString().replace(/\w\S*/g, text => text.charAt(0).toUpperCase() + text.substr(1).toLowerCase());
+}
+
+// Convert string to pascalCase
+export function toPascalCase(input = '') {
+    let string = input.toString();
+
+    // Convert kebab case
+    string = replaceAll(string, '-', ' ');
+
+    // Convert snake case
+    string = replaceAll(string, '_', ' ');
+
+    // Convert to title case
+    string = toTitleCase(string);
+
+    // Convert to pascal case
+    return replaceAll(string, ' ', '');
+}
+
+// Convert string to pascalCase
+export function toCamelCase(input = '') {
+    let string = input.toString();
+
+    // Convert to pascal case
+    string = toPascalCase(string);
+
+    // Convert first character to lowercase
+    return string.charAt(0).toLowerCase() + string.slice(1);
+}
+
+// Remove HTML from a string
+export function stripHTML(source) {
+    const fragment = document.createDocumentFragment();
+    const element = document.createElement('div');
+    fragment.appendChild(element);
+    element.innerHTML = source;
+    return fragment.firstChild.innerText;
+}
+
+// Like outerHTML, but also works for DocumentFragment
+export function getHTML(element) {
+    const wrapper = document.createElement('div');
+    wrapper.appendChild(element);
+    return wrapper.innerHTML;
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/utils/style.js

@@ -0,0 +1,78 @@
+// ==========================================================================
+// Style utils
+// ==========================================================================
+
+import is from './is';
+
+export function validateRatio(input) {
+    if (!is.array(input) && (!is.string(input) || !input.includes(':'))) {
+        return false;
+    }
+
+    const ratio = is.array(input) ? input : input.split(':');
+
+    return ratio.map(Number).every(is.number);
+}
+
+export function reduceAspectRatio(ratio) {
+    if (!is.array(ratio) || !ratio.every(is.number)) {
+        return null;
+    }
+
+    const [width, height] = ratio;
+    const getDivider = (w, h) => (h === 0 ? w : getDivider(h, w % h));
+    const divider = getDivider(width, height);
+
+    return [width / divider, height / divider];
+}
+
+export function getAspectRatio(input) {
+    const parse = ratio => (validateRatio(ratio) ? ratio.split(':').map(Number) : null);
+    // Try provided ratio
+    let ratio = parse(input);
+
+    // Get from config
+    if (ratio === null) {
+        ratio = parse(this.config.ratio);
+    }
+
+    // Get from embed
+    if (ratio === null && !is.empty(this.embed) && is.array(this.embed.ratio)) {
+        ({ ratio } = this.embed);
+    }
+
+    // Get from HTML5 video
+    if (ratio === null && this.isHTML5) {
+        const { videoWidth, videoHeight } = this.media;
+        ratio = reduceAspectRatio([videoWidth, videoHeight]);
+    }
+
+    return ratio;
+}
+
+// Set aspect ratio for responsive container
+export function setAspectRatio(input) {
+    if (!this.isVideo) {
+        return {};
+    }
+
+    const { wrapper } = this.elements;
+    const ratio = getAspectRatio.call(this, input);
+    const [w, h] = is.array(ratio) ? ratio : [0, 0];
+    const padding = (100 / w) * h;
+
+    wrapper.style.paddingBottom = `${padding}%`;
+
+    // For Vimeo we have an extra <div> to hide the standard controls and UI
+    if (this.isVimeo && this.supported.ui) {
+        const height = 240;
+        const offset = (height - padding) / (height / 50);
+        this.media.style.transform = `translateY(-${offset}%)`;
+    } else if (this.isHTML5) {
+        wrapper.classList.toggle(this.config.classNames.videoFixedRatio, ratio !== null);
+    }
+
+    return { padding, ratio };
+}
+
+export default { setAspectRatio };

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/utils/time.js

@@ -0,0 +1,35 @@
+// ==========================================================================
+// Time utils
+// ==========================================================================
+
+import is from './is';
+
+// Time helpers
+export const getHours = value => Math.trunc((value / 60 / 60) % 60, 10);
+export const getMinutes = value => Math.trunc((value / 60) % 60, 10);
+export const getSeconds = value => Math.trunc(value % 60, 10);
+
+// Format time to UI friendly string
+export function formatTime(time = 0, displayHours = false, inverted = false) {
+    // Bail if the value isn't a number
+    if (!is.number(time)) {
+        return formatTime(undefined, displayHours, inverted);
+    }
+
+    // Format time component to add leading zero
+    const format = value => `0${value}`.slice(-2);
+    // Breakdown to hours, mins, secs
+    let hours = getHours(time);
+    const mins = getMinutes(time);
+    const secs = getSeconds(time);
+
+    // Do we need to display hours?
+    if (displayHours || hours > 0) {
+        hours = `${hours}:`;
+    } else {
+        hours = '';
+    }
+
+    // Render
+    return `${inverted && time > 0 ? '-' : ''}${hours}${format(mins)}:${format(secs)}`;
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/js/utils/urls.js

@@ -0,0 +1,39 @@
+// ==========================================================================
+// URL utils
+// ==========================================================================
+
+import is from './is';
+
+/**
+ * Parse a string to a URL object
+ * @param {String} input - the URL to be parsed
+ * @param {Boolean} safe - failsafe parsing
+ */
+export function parseUrl(input, safe = true) {
+    let url = input;
+
+    if (safe) {
+        const parser = document.createElement('a');
+        parser.href = url;
+        url = parser.href;
+    }
+
+    try {
+        return new URL(url);
+    } catch (e) {
+        return null;
+    }
+}
+
+// Convert object to URLSearchParams
+export function buildUrlParams(input) {
+    const params = new URLSearchParams();
+
+    if (is.object(input)) {
+        Object.entries(input).forEach(([key, value]) => {
+            params.set(key, value);
+        });
+    }
+
+    return params;
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/base.scss

@@ -0,0 +1,69 @@
+// --------------------------------------------------------------
+// Base styling
+// --------------------------------------------------------------
+
+// Base
+.plyr {
+    @include plyr-font-smoothing($plyr-font-smoothing);
+    align-items: center;
+    direction: ltr;
+    display: flex;
+    flex-direction: column;
+    font-family: $plyr-font-family;
+    font-variant-numeric: tabular-nums; // Force monosace-esque number widths
+    font-weight: $plyr-font-weight-regular;
+    height: 100%;
+    line-height: $plyr-line-height;
+    max-width: 100%;
+    min-width: 200px;
+    position: relative;
+    text-shadow: none;
+    transition: box-shadow 0.3s ease;
+    z-index: 0; // Force any border radius
+
+    // Media elements
+    video,
+    audio,
+    iframe {
+        display: block;
+        height: 100%;
+        width: 100%;
+    }
+
+    button {
+        font: inherit;
+        line-height: inherit;
+        width: auto;
+    }
+
+    // Ignore focus
+    &:focus {
+        outline: 0;
+    }
+}
+
+// border-box everything
+// http://paulirish.com/2012/box-sizing-border-box-ftw/
+@if $plyr-border-box {
+    .plyr--full-ui {
+        box-sizing: border-box;
+
+        *,
+        *::after,
+        *::before {
+            box-sizing: inherit;
+        }
+    }
+}
+
+// Fix 300ms delay
+@if $plyr-touch-action {
+    .plyr--full-ui {
+        a,
+        button,
+        input,
+        label {
+            touch-action: manipulation;
+        }
+    }
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/components/badges.scss

@@ -0,0 +1,12 @@
+// --------------------------------------------------------------
+// Badges
+// --------------------------------------------------------------
+
+.plyr__badge {
+    background: $plyr-badge-bg;
+    border-radius: 2px;
+    color: $plyr-badge-color;
+    font-size: $plyr-font-size-badge;
+    line-height: 1;
+    padding: 3px 4px;
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/components/captions.scss

@@ -0,0 +1,59 @@
+// --------------------------------------------------------------
+// Captions
+// --------------------------------------------------------------
+
+// Hide default captions
+.plyr--full-ui ::-webkit-media-text-track-container {
+    display: none;
+}
+
+.plyr__captions {
+    animation: plyr-fade-in 0.3s ease;
+    bottom: 0;
+    color: $plyr-captions-color;
+    display: none;
+    font-size: $plyr-font-size-captions-small;
+    left: 0;
+    padding: $plyr-control-spacing;
+    position: absolute;
+    text-align: center;
+    transition: transform 0.4s ease-in-out;
+    width: 100%;
+
+    .plyr__caption {
+        background: $plyr-captions-bg;
+        border-radius: 2px;
+        box-decoration-break: clone;
+        line-height: 185%;
+        padding: 0.2em 0.5em;
+        white-space: pre-wrap;
+
+        // Firefox adds a <div> when using getCueAsHTML()
+        div {
+            display: inline;
+        }
+    }
+
+    span:empty {
+        display: none;
+    }
+
+    @media (min-width: $plyr-bp-sm) {
+        font-size: $plyr-font-size-captions-base;
+        padding: ($plyr-control-spacing * 2);
+    }
+
+    @media (min-width: $plyr-bp-md) {
+        font-size: $plyr-font-size-captions-medium;
+    }
+}
+
+.plyr--captions-active .plyr__captions {
+    display: block;
+}
+
+// If the lower controls are shown and not empty
+.plyr:not(.plyr--hide-controls) .plyr__controls:not(:empty) ~ .plyr__captions {
+    transform: translateY(-($plyr-control-spacing * 4));
+}
+

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/components/control.scss

@@ -0,0 +1,52 @@
+// --------------------------------------------------------------
+// Control buttons
+// --------------------------------------------------------------
+
+.plyr__control {
+    background: transparent;
+    border: 0;
+    border-radius: $plyr-control-radius;
+    color: inherit;
+    cursor: pointer;
+    flex-shrink: 0;
+    overflow: visible; // IE11
+    padding: $plyr-control-padding;
+    position: relative;
+    transition: all 0.3s ease;
+
+    svg {
+        display: block;
+        fill: currentColor;
+        height: $plyr-control-icon-size;
+        pointer-events: none;
+        width: $plyr-control-icon-size;
+    }
+
+    // Default focus
+    &:focus {
+        outline: 0;
+    }
+
+    // Tab focus
+    &.plyr__tab-focus {
+        @include plyr-tab-focus();
+    }
+}
+
+// Remove any link styling
+a.plyr__control {
+    text-decoration: none;
+
+    &::after,
+    &::before {
+        display: none;
+    }
+}
+
+// Change icons on state change
+.plyr__control:not(.plyr__control--pressed) .icon--pressed,
+.plyr__control.plyr__control--pressed .icon--not-pressed,
+.plyr__control:not(.plyr__control--pressed) .label--pressed,
+.plyr__control.plyr__control--pressed .label--not-pressed {
+    display: none;
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/components/controls.scss

@@ -0,0 +1,64 @@
+// --------------------------------------------------------------
+// Controls
+// --------------------------------------------------------------
+
+// Hide native controls
+.plyr--full-ui ::-webkit-media-controls {
+    display: none;
+}
+
+// Playback controls
+.plyr__controls {
+    align-items: center;
+    display: flex;
+    justify-content: flex-end;
+    text-align: center;
+
+    .plyr__progress__container {
+        flex: 1;
+        min-width: 0; // Fix for Edge issue where content would overflow
+    }
+
+    // Spacing
+    .plyr__controls__item {
+        margin-left: ($plyr-control-spacing / 4);
+
+        &:first-child {
+            margin-left: 0;
+            margin-right: auto;
+        }
+
+        &.plyr__progress__container {
+            padding-left: ($plyr-control-spacing / 4);
+        }
+
+        &.plyr__time {
+            padding: 0 ($plyr-control-spacing / 2);
+        }
+
+        &.plyr__progress__container:first-child,
+        &.plyr__time:first-child,
+        &.plyr__time + .plyr__time {
+            padding-left: 0;
+        }
+    }
+
+    // Hide empty controls
+    &:empty {
+        display: none;
+    }
+}
+
+// Some options are hidden by default
+.plyr [data-plyr='captions'],
+.plyr [data-plyr='pip'],
+.plyr [data-plyr='airplay'],
+.plyr [data-plyr='fullscreen'] {
+    display: none;
+}
+.plyr--captions-enabled [data-plyr='captions'],
+.plyr--pip-supported [data-plyr='pip'],
+.plyr--airplay-supported [data-plyr='airplay'],
+.plyr--fullscreen-enabled [data-plyr='fullscreen'] {
+    display: inline-block;
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/components/menus.scss

@@ -0,0 +1,200 @@
+// --------------------------------------------------------------
+// Menus
+// --------------------------------------------------------------
+
+.plyr__menu {
+    display: flex; // Edge fix
+    position: relative;
+
+    // Animate the icon
+    .plyr__control svg {
+        transition: transform 0.3s ease;
+    }
+    .plyr__control[aria-expanded='true'] {
+        svg {
+            transform: rotate(90deg);
+        }
+
+        // Hide tooltip
+        .plyr__tooltip {
+            display: none;
+        }
+    }
+
+    // The actual menu container
+    &__container {
+        animation: plyr-popup 0.2s ease;
+        background: $plyr-menu-bg;
+        border-radius: 4px;
+        bottom: 100%;
+        box-shadow: $plyr-menu-shadow;
+        color: $plyr-menu-color;
+        font-size: $plyr-font-size-base;
+        margin-bottom: 10px;
+        position: absolute;
+        right: -3px;
+        text-align: left;
+        white-space: nowrap;
+        z-index: 3;
+
+        > div {
+            overflow: hidden;
+            transition: height 0.35s cubic-bezier(0.4, 0, 0.2, 1), width 0.35s cubic-bezier(0.4, 0, 0.2, 1);
+        }
+
+        // Arrow
+        &::after {
+            border: 4px solid transparent;
+            border-top-color: $plyr-menu-bg;
+            content: '';
+            height: 0;
+            position: absolute;
+            right: 15px;
+            top: 100%;
+            width: 0;
+        }
+
+        [role='menu'] {
+            padding: $plyr-control-padding;
+        }
+
+        [role='menuitem'],
+        [role='menuitemradio'] {
+            margin-top: 2px;
+
+            &:first-child {
+                margin-top: 0;
+            }
+        }
+
+        // Options
+        .plyr__control {
+            align-items: center;
+            color: $plyr-menu-color;
+            display: flex;
+            font-size: $plyr-font-size-menu;
+            padding: ceil($plyr-control-padding / 2) ceil($plyr-control-padding * 1.5);
+            user-select: none;
+            width: 100%;
+
+            > span {
+                align-items: inherit;
+                display: flex;
+                width: 100%;
+            }
+
+            &::after {
+                border: 4px solid transparent;
+                content: '';
+                position: absolute;
+                top: 50%;
+                transform: translateY(-50%);
+            }
+
+            &--forward {
+                padding-right: ceil($plyr-control-padding * 4);
+
+                &::after {
+                    border-left-color: rgba($plyr-menu-color, 0.8);
+                    right: 5px;
+                }
+
+                &.plyr__tab-focus::after,
+                &:hover::after {
+                    border-left-color: currentColor;
+                }
+            }
+
+            &--back {
+                $horizontal-padding: ($plyr-control-padding * 2);
+                font-weight: $plyr-font-weight-regular;
+                margin: $plyr-control-padding;
+                margin-bottom: floor($plyr-control-padding / 2);
+                padding-left: ceil($plyr-control-padding * 4);
+                position: relative;
+                width: calc(100% - #{$horizontal-padding});
+
+                &::after {
+                    border-right-color: rgba($plyr-menu-color, 0.8);
+                    left: $plyr-control-padding;
+                }
+
+                &::before {
+                    background: $plyr-menu-border-color;
+                    box-shadow: 0 1px 0 $plyr-menu-border-shadow-color;
+                    content: '';
+                    height: 1px;
+                    left: 0;
+                    margin-top: ceil($plyr-control-padding / 2);
+                    overflow: hidden;
+                    position: absolute;
+                    right: 0;
+                    top: 100%;
+                }
+
+                &.plyr__tab-focus::after,
+                &:hover::after {
+                    border-right-color: currentColor;
+                }
+            }
+        }
+
+        .plyr__control[role='menuitemradio'] {
+            padding-left: $plyr-control-padding;
+
+            &::before,
+            &::after {
+                border-radius: 100%;
+            }
+
+            &::before {
+                background: rgba(#000, 0.1);
+                content: '';
+                display: block;
+                flex-shrink: 0;
+                height: 16px;
+                margin-right: $plyr-control-spacing;
+                transition: all 0.3s ease;
+                width: 16px;
+            }
+
+            &::after {
+                background: #fff;
+                border: 0;
+                height: 6px;
+                left: 12px;
+                opacity: 0;
+                top: 50%;
+                transform: translateY(-50%) scale(0);
+                transition: transform 0.3s ease, opacity 0.3s ease;
+                width: 6px;
+            }
+
+            &[aria-checked='true'] {
+                &::before {
+                    background: $plyr-color-main;
+                }
+                &::after {
+                    opacity: 1;
+                    transform: translateY(-50%) scale(1);
+                }
+            }
+
+            &.plyr__tab-focus::before,
+            &:hover::before {
+                background: rgba(#000, 0.1);
+            }
+        }
+
+        // Option value
+        .plyr__menu__value {
+            align-items: center;
+            display: flex;
+            margin-left: auto;
+            margin-right: -($plyr-control-padding - 2);
+            overflow: hidden;
+            padding-left: ceil($plyr-control-padding * 3.5);
+            pointer-events: none;
+        }
+    }
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/components/poster.scss

@@ -0,0 +1,22 @@
+// --------------------------------------------------------------
+// Faux poster overlay
+// --------------------------------------------------------------
+
+.plyr__poster {
+    background-color: #000;
+    background-position: 50% 50%;
+    background-repeat: no-repeat;
+    background-size: contain;
+    height: 100%;
+    left: 0;
+    opacity: 0;
+    position: absolute;
+    top: 0;
+    transition: opacity 0.2s ease;
+    width: 100%;
+    z-index: 1;
+}
+
+.plyr--stopped.plyr__poster-enabled .plyr__poster {
+    opacity: 1;
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/components/progress.scss

@@ -0,0 +1,94 @@
+// --------------------------------------------------------------
+// Playback progress
+// --------------------------------------------------------------
+
+// Offset the range thumb in order to be able to calculate the relative progress (#954)
+$plyr-progress-offset: $plyr-range-thumb-height;
+
+.plyr__progress {
+    left: $plyr-progress-offset / 2;
+    margin-right: $plyr-progress-offset;
+    position: relative;
+
+    input[type='range'],
+    &__buffer {
+        margin-left: -($plyr-progress-offset / 2);
+        margin-right: -($plyr-progress-offset / 2);
+        width: calc(100% + #{$plyr-progress-offset});
+    }
+
+    input[type='range'] {
+        position: relative;
+        z-index: 2;
+    }
+
+    // Seek tooltip to show time
+    .plyr__tooltip {
+        font-size: $plyr-font-size-time;
+        left: 0;
+    }
+}
+
+.plyr__progress__buffer {
+    -webkit-appearance: none; /* stylelint-disable-line */
+    background: transparent;
+    border: 0;
+    border-radius: 100px;
+    height: $plyr-range-track-height;
+    left: 0;
+    margin-top: -($plyr-range-track-height / 2);
+    padding: 0;
+    position: absolute;
+    top: 50%;
+
+    &::-webkit-progress-bar {
+        background: transparent;
+    }
+
+    &::-webkit-progress-value {
+        background: currentColor;
+        border-radius: 100px;
+        min-width: $plyr-range-track-height;
+        transition: width 0.2s ease;
+    }
+
+    // Mozilla
+    &::-moz-progress-bar {
+        background: currentColor;
+        border-radius: 100px;
+        min-width: $plyr-range-track-height;
+        transition: width 0.2s ease;
+    }
+
+    // Microsoft
+    &::-ms-fill {
+        border-radius: 100px;
+        transition: width 0.2s ease;
+    }
+}
+
+// Loading state
+.plyr--loading .plyr__progress__buffer {
+    animation: plyr-progress 1s linear infinite;
+    background-image: linear-gradient(
+        -45deg,
+        $plyr-progress-loading-bg 25%,
+        transparent 25%,
+        transparent 50%,
+        $plyr-progress-loading-bg 50%,
+        $plyr-progress-loading-bg 75%,
+        transparent 75%,
+        transparent
+    );
+    background-repeat: repeat-x;
+    background-size: $plyr-progress-loading-size $plyr-progress-loading-size;
+    color: transparent;
+}
+
+.plyr--video.plyr--loading .plyr__progress__buffer {
+    background-color: $plyr-video-progress-buffered-bg;
+}
+
+.plyr--audio.plyr--loading .plyr__progress__buffer {
+    background-color: $plyr-audio-progress-buffered-bg;
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/components/sliders.scss

@@ -0,0 +1,94 @@
+// --------------------------------------------------------------
+// Slider inputs - <input type="range">
+// --------------------------------------------------------------
+
+.plyr--full-ui input[type='range'] {
+    // WebKit
+    -webkit-appearance: none; /* stylelint-disable-line */
+    background: transparent;
+    border: 0;
+    border-radius: ($plyr-range-thumb-height * 2);
+    // color is used in JS to populate lower fill for WebKit
+    color: $plyr-range-fill-bg;
+    display: block;
+    height: $plyr-range-max-height;
+    margin: 0;
+    padding: 0;
+    transition: box-shadow 0.3s ease;
+    width: 100%;
+
+    &::-webkit-slider-runnable-track {
+        @include plyr-range-track();
+        background-image: linear-gradient(to right, currentColor var(--value, 0%), transparent var(--value, 0%));
+    }
+
+    &::-webkit-slider-thumb {
+        @include plyr-range-thumb();
+        -webkit-appearance: none; /* stylelint-disable-line */
+        margin-top: -(($plyr-range-thumb-height - $plyr-range-track-height) / 2);
+    }
+
+    // Mozilla
+    &::-moz-range-track {
+        @include plyr-range-track();
+    }
+
+    &::-moz-range-thumb {
+        @include plyr-range-thumb();
+    }
+
+    &::-moz-range-progress {
+        background: currentColor;
+        border-radius: ($plyr-range-track-height / 2);
+        height: $plyr-range-track-height;
+    }
+
+    // Microsoft
+    &::-ms-track {
+        @include plyr-range-track();
+        color: transparent;
+    }
+
+    &::-ms-fill-upper {
+        @include plyr-range-track();
+    }
+
+    &::-ms-fill-lower {
+        @include plyr-range-track();
+
+        background: currentColor;
+    }
+
+    &::-ms-thumb {
+        @include plyr-range-thumb();
+        // For some reason, Edge uses the -webkit margin above
+        margin-top: 0;
+    }
+
+    &::-ms-tooltip {
+        display: none;
+    }
+
+    // Focus styles
+    &:focus {
+        outline: 0;
+    }
+
+    &::-moz-focus-outer {
+        border: 0;
+    }
+
+    &.plyr__tab-focus {
+        &::-webkit-slider-runnable-track {
+            @include plyr-tab-focus();
+        }
+
+        &::-moz-range-track {
+            @include plyr-tab-focus();
+        }
+
+        &::-ms-track {
+            @include plyr-tab-focus();
+        }
+    }
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/components/times.scss

@@ -0,0 +1,20 @@
+// --------------------------------------------------------------
+// Time
+// --------------------------------------------------------------
+
+.plyr__time {
+    font-size: $plyr-font-size-time;
+}
+
+// Media duration hidden on small screens
+.plyr__time + .plyr__time {
+    // Add a slash in before
+    &::before {
+        content: '\2044';
+        margin-right: $plyr-control-spacing;
+    }
+
+    @media (max-width: $plyr-bp-sm-max) {
+        display: none;
+    }
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/components/tooltips.scss

@@ -0,0 +1,88 @@
+// --------------------------------------------------------------
+// Tooltips
+// --------------------------------------------------------------
+
+.plyr__tooltip {
+    background: $plyr-tooltip-bg;
+    border-radius: $plyr-tooltip-radius;
+    bottom: 100%;
+    box-shadow: $plyr-tooltip-shadow;
+    color: $plyr-tooltip-color;
+    font-size: $plyr-font-size-small;
+    font-weight: $plyr-font-weight-regular;
+    left: 50%;
+    line-height: 1.3;
+    margin-bottom: ($plyr-tooltip-padding * 2);
+    opacity: 0;
+    padding: $plyr-tooltip-padding ($plyr-tooltip-padding * 1.5);
+    pointer-events: none;
+    position: absolute;
+    transform: translate(-50%, 10px) scale(0.8);
+    transform-origin: 50% 100%;
+    transition: transform 0.2s 0.1s ease, opacity 0.2s 0.1s ease;
+    white-space: nowrap;
+    z-index: 2;
+
+    // The background triangle
+    &::before {
+        border-left: $plyr-tooltip-arrow-size solid transparent;
+        border-right: $plyr-tooltip-arrow-size solid transparent;
+        border-top: $plyr-tooltip-arrow-size solid $plyr-tooltip-bg;
+        bottom: -$plyr-tooltip-arrow-size;
+        content: '';
+        height: 0;
+        left: 50%;
+        position: absolute;
+        transform: translateX(-50%);
+        width: 0;
+        z-index: 2;
+    }
+}
+
+// Displaying
+.plyr .plyr__control:hover .plyr__tooltip,
+.plyr .plyr__control.plyr__tab-focus .plyr__tooltip,
+.plyr__tooltip--visible {
+    opacity: 1;
+    transform: translate(-50%, 0) scale(1);
+}
+
+.plyr .plyr__control:hover .plyr__tooltip {
+    z-index: 3;
+}
+
+// First tooltip
+.plyr__controls > .plyr__control:first-child .plyr__tooltip,
+.plyr__controls > .plyr__control:first-child + .plyr__control .plyr__tooltip {
+    left: 0;
+    transform: translate(0, 10px) scale(0.8);
+    transform-origin: 0 100%;
+
+    &::before {
+        left: ($plyr-control-icon-size / 2) + $plyr-control-padding;
+    }
+}
+
+// Last tooltip
+.plyr__controls > .plyr__control:last-child .plyr__tooltip {
+    left: auto;
+    right: 0;
+    transform: translate(0, 10px) scale(0.8);
+    transform-origin: 100% 100%;
+
+    &::before {
+        left: auto;
+        right: ($plyr-control-icon-size / 2) + $plyr-control-padding;
+        transform: translateX(50%);
+    }
+}
+
+.plyr__controls > .plyr__control:first-child,
+.plyr__controls > .plyr__control:first-child + .plyr__control,
+.plyr__controls > .plyr__control:last-child {
+    &:hover .plyr__tooltip,
+    &.plyr__tab-focus .plyr__tooltip,
+    .plyr__tooltip--visible {
+        transform: translate(0, 0) scale(1);
+    }
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/components/volume.scss

@@ -0,0 +1,25 @@
+// --------------------------------------------------------------
+// Volume
+// --------------------------------------------------------------
+
+.plyr__volume {
+    align-items: center;
+    display: flex;
+    max-width: 110px;
+    min-width: 80px;
+    position: relative;
+    width: 20%;
+
+    input[type='range'] {
+        margin-left: ($plyr-control-spacing / 2);
+        margin-right: ($plyr-control-spacing / 2);
+        position: relative;
+        z-index: 2;
+    }
+}
+
+// Auto size on iOS as there's no slider
+.plyr--is-ios .plyr__volume {
+    min-width: 0;
+    width: auto;
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/lib/animation.scss

@@ -0,0 +1,31 @@
+// --------------------------------------------------------------
+// Animations
+// --------------------------------------------------------------
+
+@keyframes plyr-progress {
+    to {
+        background-position: $plyr-progress-loading-size 0;
+    }
+}
+
+@keyframes plyr-popup {
+    0% {
+        opacity: 0.5;
+        transform: translateY(10px);
+    }
+
+    to {
+        opacity: 1;
+        transform: translateY(0);
+    }
+}
+
+@keyframes plyr-fade-in {
+    from {
+        opacity: 0;
+    }
+
+    to {
+        opacity: 1;
+    }
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/lib/functions.scss

@@ -0,0 +1,7 @@
+// ==========================================================================
+// Useful functions
+// ==========================================================================
+
+@function to-percentage($input) {
+    @return $input * 1%;
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/lib/mixins.scss

@@ -0,0 +1,96 @@
+// ==========================================================================
+// Mixins
+// ==========================================================================
+
+// Nicer focus styles
+// ---------------------------------------
+@mixin plyr-tab-focus($color: $plyr-tab-focus-default-color) {
+    box-shadow: 0 0 0 5px rgba($color, 0.5);
+    outline: 0;
+}
+
+// Font smoothing
+// ---------------------------------------
+@mixin plyr-font-smoothing($mode: true) {
+    @if $mode {
+        -moz-osx-font-smoothing: grayscale;
+        -webkit-font-smoothing: antialiased;
+    } @else {
+        -moz-osx-font-smoothing: auto;
+        -webkit-font-smoothing: subpixel-antialiased;
+    }
+}
+
+// <input type="range"> styling
+// ---------------------------------------
+@mixin plyr-range-track() {
+    background: transparent;
+    border: 0;
+    border-radius: ($plyr-range-track-height / 2);
+    height: $plyr-range-track-height;
+    transition: box-shadow 0.3s ease;
+    user-select: none;
+}
+
+@mixin plyr-range-thumb() {
+    background: $plyr-range-thumb-bg;
+    border: 0;
+    border-radius: 100%;
+    box-shadow: $plyr-range-thumb-shadow;
+    height: $plyr-range-thumb-height;
+    position: relative;
+    transition: all 0.2s ease;
+    width: $plyr-range-thumb-height;
+}
+
+@mixin plyr-range-thumb-active($color: rgba($plyr-range-thumb-bg, 0.5)) {
+    box-shadow: $plyr-range-thumb-shadow, 0 0 0 $plyr-range-thumb-active-shadow-width $color;
+}
+
+// Fullscreen styles
+// ---------------------------------------
+@mixin plyr-fullscreen-active() {
+    background: #000;
+    border-radius: 0 !important;
+    height: 100%;
+    margin: 0;
+    width: 100%;
+
+    video {
+        height: 100%;
+    }
+
+    .plyr__video-wrapper {
+        height: 100%;
+        position: static;
+    }
+
+    // Vimeo requires some different styling
+    &.plyr--vimeo .plyr__video-wrapper {
+        height: 0;
+        position: relative;
+        top: 50%;
+        transform: translateY(-50%);
+    }
+
+    // Display correct icon
+    .plyr__control .icon--exit-fullscreen {
+        display: block;
+
+        + svg {
+            display: none;
+        }
+    }
+
+    // Hide cursor in fullscreen when controls hidden
+    &.plyr--hide-controls {
+        cursor: none;
+    }
+
+    // Large captions in full screen on larger screens
+    @media (min-width: $plyr-bp-lg) {
+        .plyr__captions {
+            font-size: $plyr-font-size-captions-large;
+        }
+    }
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/plugins/ads.scss

@@ -0,0 +1,56 @@
+// ==========================================================================
+// Advertisements
+// ==========================================================================
+
+.plyr__ads {
+    border-radius: inherit;
+    bottom: 0;
+    cursor: pointer;
+    left: 0;
+    overflow: hidden;
+    position: absolute;
+    right: 0;
+    top: 0;
+    z-index: -1; // Hide it by default
+
+    // Make sure the inner container is big enough for the ad creative.
+    > div,
+    > div iframe {
+        height: 100%;
+        position: absolute;
+        width: 100%;
+    }
+
+    // The countdown label
+    &::after {
+        background: rgba($plyr-color-gray-9, 0.8);
+        border-radius: 2px;
+        bottom: $plyr-control-spacing;
+        color: #fff;
+        content: attr(data-badge-text);
+        font-size: 11px;
+        padding: 2px 6px;
+        pointer-events: none;
+        position: absolute;
+        right: $plyr-control-spacing;
+        z-index: 3;
+    }
+
+    &::after:empty {
+        display: none;
+    }
+}
+
+// Advertisement cue's for the progress bar
+.plyr__cues {
+    background: currentColor;
+    display: block;
+    height: $plyr-range-track-height;
+    left: 0;
+    margin: -($plyr-range-track-height / 2) 0 0;
+    opacity: 0.8;
+    position: absolute;
+    top: 50%;
+    width: 3px;
+    z-index: 3; // Between progress and thumb
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/plugins/preview-thumbnails.scss

@@ -0,0 +1,118 @@
+// --------------------------------------------------------------
+// Preview Thumbnails
+// --------------------------------------------------------------
+
+$plyr-preview-padding: $plyr-tooltip-padding !default;
+$plyr-preview-bg: $plyr-tooltip-bg !default;
+$plyr-preview-radius: $plyr-tooltip-radius !default;
+$plyr-preview-shadow: $plyr-tooltip-shadow !default;
+$plyr-preview-arrow-size: $plyr-tooltip-arrow-size !default;
+$plyr-preview-image-bg: $plyr-color-gray-2 !default;
+$plyr-preview-time-font-size: $plyr-font-size-time !default;
+$plyr-preview-time-padding: 3px 6px !default;
+$plyr-preview-time-bg: rgba(0, 0, 0, 0.55);
+$plyr-preview-time-color: #fff;
+$plyr-preview-time-bottom-offset: 6px;
+
+.plyr__preview-thumb {
+    background-color: $plyr-preview-bg;
+    border-radius: 3px;
+    bottom: 100%;
+    box-shadow: $plyr-preview-shadow;
+    margin-bottom: $plyr-preview-padding * 2;
+    opacity: 0;
+    padding: $plyr-preview-radius;
+    pointer-events: none;
+    position: absolute;
+    transform: translate(0, 10px) scale(0.8);
+    transform-origin: 50% 100%;
+    transition: transform 0.2s 0.1s ease, opacity 0.2s 0.1s ease;
+    z-index: 2;
+
+    &--is-shown {
+        opacity: 1;
+        transform: translate(0, 0) scale(1);
+    }
+
+    // The background triangle
+    &::before {
+        border-left: $plyr-preview-arrow-size solid transparent;
+        border-right: $plyr-preview-arrow-size solid transparent;
+        border-top: $plyr-preview-arrow-size solid $plyr-preview-bg;
+        bottom: -$plyr-preview-arrow-size;
+        content: '';
+        height: 0;
+        left: 50%;
+        position: absolute;
+        transform: translateX(-50%);
+        width: 0;
+        z-index: 2;
+    }
+
+    &__image-container {
+        background: $plyr-preview-image-bg;
+        border-radius: ($plyr-preview-radius - 1px);
+        overflow: hidden;
+        position: relative;
+        z-index: 0;
+
+        img {
+            height: 100%; // Non sprite images are 100%. Sprites will have their size applied by JavaScript
+            left: 0;
+            max-height: none;
+            max-width: none;
+            position: absolute;
+            top: 0;
+            width: 100%;
+        }
+    }
+
+    // Seek time text
+    &__time-container {
+        bottom: $plyr-preview-time-bottom-offset;
+        left: 0;
+        position: absolute;
+        right: 0;
+        white-space: nowrap;
+        z-index: 3;
+
+        span {
+            background-color: $plyr-preview-time-bg;
+            border-radius: ($plyr-preview-radius - 1px);
+            color: $plyr-preview-time-color;
+            font-size: $plyr-preview-time-font-size;
+            padding: $plyr-preview-time-padding;
+        }
+    }
+}
+
+.plyr__preview-scrubbing {
+    bottom: 0;
+    filter: blur(1px);
+    height: 100%;
+    left: 0;
+    margin: auto; // Required when video is different dimensions to container (e.g. fullscreen)
+    opacity: 0;
+    overflow: hidden;
+    position: absolute;
+    right: 0;
+    top: 0;
+    transition: opacity 0.3s ease;
+    width: 100%;
+    z-index: 1;
+
+    &--is-shown {
+        opacity: 1;
+    }
+
+    img {
+        height: 100%;
+        left: 0;
+        max-height: none;
+        max-width: none;
+        object-fit: contain;
+        position: absolute;
+        top: 0;
+        width: 100%;
+    }
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/plyr.scss

@@ -0,0 +1,49 @@
+// ==========================================================================
+// Plyr styles
+// https://github.com/sampotts/plyr
+// TODO: Review use of BEM classnames
+// ==========================================================================
+@charset 'UTF-8';
+
+@import 'settings/breakpoints';
+@import 'settings/colors';
+@import 'settings/cosmetics';
+@import 'settings/type';
+
+@import 'settings/badges';
+@import 'settings/captions';
+@import 'settings/controls';
+@import 'settings/helpers';
+@import 'settings/menus';
+@import 'settings/progress';
+@import 'settings/sliders';
+@import 'settings/tooltips';
+
+@import 'lib/animation';
+@import 'lib/functions';
+@import 'lib/mixins';
+
+@import 'base';
+
+@import 'components/badges';
+@import 'components/captions';
+@import 'components/control';
+@import 'components/controls';
+@import 'components/menus';
+@import 'components/sliders';
+@import 'components/poster';
+@import 'components/times';
+@import 'components/tooltips';
+@import 'components/progress';
+@import 'components/volume';
+
+@import 'types/audio';
+@import 'types/video';
+
+@import 'states/fullscreen';
+
+@import 'plugins/ads';
+@import 'plugins/preview-thumbnails';
+
+@import 'utils/animation';
+@import 'utils/hidden';

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/settings/badges.scss

@@ -0,0 +1,6 @@
+// ==========================================================================
+// Badges
+// ==========================================================================
+
+$plyr-badge-bg: $plyr-color-gray-7 !default;
+$plyr-badge-color: #fff !default;

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/settings/breakpoints.scss

@@ -0,0 +1,12 @@
+// ==========================================================================
+// Breakpoints
+// ==========================================================================
+
+$plyr-bp-sm: 480px !default;
+$plyr-bp-md: 768px !default;
+$plyr-bp-lg: 1024px !default;
+
+// Max-width media queries
+$plyr-bp-xs-max: ($plyr-bp-sm - 1);
+$plyr-bp-sm-max: ($plyr-bp-md - 1);
+$plyr-bp-md-max: ($plyr-bp-lg - 1);

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/settings/captions.scss

@@ -0,0 +1,10 @@
+// ==========================================================================
+// Captions
+// ==========================================================================
+
+$plyr-captions-bg: rgba(#000, 0.8) !default;
+$plyr-captions-color: #fff !default;
+$plyr-font-size-captions-base: $plyr-font-size-base !default;
+$plyr-font-size-captions-small: $plyr-font-size-small !default;
+$plyr-font-size-captions-medium: $plyr-font-size-large !default;
+$plyr-font-size-captions-large: $plyr-font-size-xlarge !default;

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/settings/colors.scss

@@ -0,0 +1,17 @@
+// ==========================================================================
+// Colors
+// ==========================================================================
+
+$plyr-color-main: hsl(198, 100%, 50%) !default;
+
+// Grayscale
+$plyr-color-gray-9: hsl(210, 15%, 16%);
+$plyr-color-gray-8: lighten($plyr-color-gray-9, 9%);
+$plyr-color-gray-7: lighten($plyr-color-gray-8, 9%);
+$plyr-color-gray-6: lighten($plyr-color-gray-7, 9%);
+$plyr-color-gray-5: lighten($plyr-color-gray-6, 9%);
+$plyr-color-gray-4: lighten($plyr-color-gray-5, 9%);
+$plyr-color-gray-3: lighten($plyr-color-gray-4, 9%);
+$plyr-color-gray-2: lighten($plyr-color-gray-3, 9%);
+$plyr-color-gray-1: lighten($plyr-color-gray-2, 9%);
+$plyr-color-gray-0: lighten($plyr-color-gray-1, 9%);

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/settings/controls.scss

@@ -0,0 +1,18 @@
+// ==========================================================================
+// Controls
+// ==========================================================================
+
+$plyr-control-icon-size: 18px !default;
+$plyr-control-spacing: 10px !default;
+$plyr-control-padding: ($plyr-control-spacing * 0.7) !default;
+$plyr-control-radius: 3px !default;
+
+$plyr-video-controls-bg: #000 !default;
+$plyr-video-control-color: #fff !default;
+$plyr-video-control-color-hover: #fff !default;
+$plyr-video-control-bg-hover: $plyr-color-main !default;
+
+$plyr-audio-controls-bg: #fff !default;
+$plyr-audio-control-color: $plyr-color-gray-7 !default;
+$plyr-audio-control-color-hover: #fff !default;
+$plyr-audio-control-bg-hover: $plyr-color-main !default;

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/settings/cosmetics.scss

@@ -0,0 +1,5 @@
+// ==========================================================================
+// Cosmetic
+// ==========================================================================
+
+$plyr-tab-focus-default-color: $plyr-color-main !default;

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/settings/helpers.scss

@@ -0,0 +1,7 @@
+// ==========================================================================
+// Enable helpers
+// ==========================================================================
+
+$plyr-border-box: true !default;
+$plyr-touch-action: true !default;
+$plyr-sr-only-important: true !default;

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/settings/menus.scss

@@ -0,0 +1,10 @@
+// ==========================================================================
+// Menus
+// ==========================================================================
+
+$plyr-menu-bg: rgba(#fff, 0.9) !default;
+$plyr-menu-color: $plyr-color-gray-7 !default;
+$plyr-menu-arrow-size: 6px !default;
+$plyr-menu-border-color: rgba($plyr-color-gray-5, 0.2) !default;
+$plyr-menu-border-shadow-color: #fff !default;
+$plyr-menu-shadow: 0 1px 2px rgba(#000, 0.15) !default;

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/settings/progress.scss

@@ -0,0 +1,11 @@
+// ==========================================================================
+// Progress
+// ==========================================================================
+
+// Loading
+$plyr-progress-loading-size: 25px !default;
+$plyr-progress-loading-bg: rgba($plyr-color-gray-9, 0.6) !default;
+
+// Buffered
+$plyr-video-progress-buffered-bg: rgba(#fff, 0.25) !default;
+$plyr-audio-progress-buffered-bg: rgba($plyr-color-gray-2, 0.66) !default;

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/settings/sliders.scss

@@ -0,0 +1,24 @@
+// ==========================================================================
+// Sliders
+// ==========================================================================
+
+// Active state
+$plyr-range-thumb-active-shadow-width: 3px !default;
+
+// Thumb
+$plyr-range-thumb-height: 13px !default;
+$plyr-range-thumb-bg: #fff !default;
+$plyr-range-thumb-border: 2px solid transparent !default;
+$plyr-range-thumb-shadow: 0 1px 1px rgba(#000, 0.15), 0 0 0 1px rgba($plyr-color-gray-9, 0.2) !default;
+
+// Track
+$plyr-range-track-height: 5px !default;
+$plyr-range-max-height: ($plyr-range-thumb-active-shadow-width * 2) + $plyr-range-thumb-height !default;
+
+// Fill
+$plyr-range-fill-bg: $plyr-color-main !default;
+
+// Type specific
+$plyr-video-range-track-bg: $plyr-video-progress-buffered-bg !default;
+$plyr-audio-range-track-bg: $plyr-audio-progress-buffered-bg !default;
+$plyr-audio-range-thumb-shadow-color: rgba(#000, 0.1) !default;

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/settings/tooltips.scss

@@ -0,0 +1,10 @@
+// ==========================================================================
+// Tooltips
+// ==========================================================================
+
+$plyr-tooltip-bg: rgba(#fff, 0.9) !default;
+$plyr-tooltip-color: $plyr-color-gray-7 !default;
+$plyr-tooltip-padding: ($plyr-control-spacing / 2) !default;
+$plyr-tooltip-arrow-size: 4px !default;
+$plyr-tooltip-radius: 3px !default;
+$plyr-tooltip-shadow: 0 1px 2px rgba(#000, 0.15) !default;

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/settings/type.scss

@@ -0,0 +1,20 @@
+// ==========================================================================
+// Typography
+// ==========================================================================
+
+$plyr-font-family: Avenir, 'Avenir Next', 'Helvetica Neue', 'Segoe UI', Helvetica, Arial, sans-serif !default;
+$plyr-font-size-base: 16px !default;
+$plyr-font-size-small: 14px !default;
+$plyr-font-size-large: 18px !default;
+$plyr-font-size-xlarge: 21px !default;
+
+$plyr-font-size-time: $plyr-font-size-small !default;
+$plyr-font-size-badge: 9px !default;
+$plyr-font-size-menu: $plyr-font-size-small !default;
+
+$plyr-font-weight-regular: 500 !default;
+$plyr-font-weight-bold: 600 !default;
+
+$plyr-line-height: 1.7 !default;
+
+$plyr-font-smoothing: false !default;

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/states/fullscreen.scss

@@ -0,0 +1,34 @@
+// --------------------------------------------------------------
+// Fullscreen
+// --------------------------------------------------------------
+
+.plyr:fullscreen {
+    @include plyr-fullscreen-active();
+}
+
+/* stylelint-disable-next-line */
+.plyr:-webkit-full-screen {
+    @include plyr-fullscreen-active();
+}
+
+/* stylelint-disable-next-line */
+.plyr:-moz-full-screen {
+    @include plyr-fullscreen-active();
+}
+
+/* stylelint-disable-next-line */
+.plyr:-ms-fullscreen {
+    @include plyr-fullscreen-active();
+}
+
+// Fallback for unsupported browsers
+.plyr--fullscreen-fallback {
+    @include plyr-fullscreen-active();
+    bottom: 0;
+    display: block;
+    left: 0;
+    position: fixed;
+    right: 0;
+    top: 0;
+    z-index: 10000000;
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/types/audio.scss

@@ -0,0 +1,61 @@
+// --------------------------------------------------------------
+// Audio styles
+// --------------------------------------------------------------
+
+// Container
+.plyr--audio {
+    display: block;
+}
+
+// Controls container
+.plyr--audio .plyr__controls {
+    background: $plyr-audio-controls-bg;
+    border-radius: inherit;
+    color: $plyr-audio-control-color;
+    padding: $plyr-control-spacing;
+}
+
+// Control elements
+.plyr--audio .plyr__control {
+    &.plyr__tab-focus,
+    &:hover,
+    &[aria-expanded='true'] {
+        background: $plyr-audio-control-bg-hover;
+        color: $plyr-audio-control-color-hover;
+    }
+}
+
+// Range inputs
+.plyr--full-ui.plyr--audio input[type='range'] {
+    &::-webkit-slider-runnable-track {
+        background-color: $plyr-audio-range-track-bg;
+    }
+
+    &::-moz-range-track {
+        background-color: $plyr-audio-range-track-bg;
+    }
+
+    &::-ms-track {
+        background-color: $plyr-audio-range-track-bg;
+    }
+
+    // Pressed styles
+    &:active {
+        &::-webkit-slider-thumb {
+            @include plyr-range-thumb-active($plyr-audio-range-thumb-shadow-color);
+        }
+
+        &::-moz-range-thumb {
+            @include plyr-range-thumb-active($plyr-audio-range-thumb-shadow-color);
+        }
+
+        &::-ms-thumb {
+            @include plyr-range-thumb-active($plyr-audio-range-thumb-shadow-color);
+        }
+    }
+}
+
+// Progress
+.plyr--audio .plyr__progress__buffer {
+    color: $plyr-audio-progress-buffered-bg;
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/types/video.scss

@@ -0,0 +1,158 @@
+// --------------------------------------------------------------
+// Video styles
+// --------------------------------------------------------------
+
+// Container
+.plyr--video {
+    background: #000;
+    overflow: hidden;
+
+    &.plyr--menu-open {
+        overflow: visible;
+    }
+}
+
+.plyr__video-wrapper {
+    background: #000;
+    height: 100%;
+    margin: auto;
+    overflow: hidden;
+    width: 100%;
+}
+
+// Default to 16:9 ratio but this is set by JavaScript based on config
+$embed-padding: ((100 / 16) * 9);
+
+.plyr__video-embed,
+.plyr__video-wrapper--fixed-ratio {
+    height: 0;
+    padding-bottom: to-percentage($embed-padding);
+}
+
+.plyr__video-embed iframe,
+.plyr__video-wrapper--fixed-ratio video {
+    border: 0;
+    left: 0;
+    position: absolute;
+    top: 0;
+}
+
+// If the full custom UI is supported
+.plyr--full-ui .plyr__video-embed {
+    $height: 240;
+    $offset: to-percentage(($height - $embed-padding) / ($height / 50));
+
+    // Only used for Vimeo
+    > .plyr__video-embed__container {
+        padding-bottom: to-percentage($height);
+        position: relative;
+        transform: translateY(-$offset);
+    }
+}
+
+// Controls container
+.plyr--video .plyr__controls {
+    background: linear-gradient(rgba($plyr-video-controls-bg, 0), rgba($plyr-video-controls-bg, 0.7));
+    border-bottom-left-radius: inherit;
+    border-bottom-right-radius: inherit;
+    bottom: 0;
+    color: $plyr-video-control-color;
+    left: 0;
+    padding: ($plyr-control-spacing * 2) ($plyr-control-spacing / 2) ($plyr-control-spacing / 2);
+    position: absolute;
+    right: 0;
+    transition: opacity 0.4s ease-in-out, transform 0.4s ease-in-out;
+    z-index: 3;
+
+    @media (min-width: $plyr-bp-sm) {
+        padding: ($plyr-control-spacing * 3.5) $plyr-control-spacing $plyr-control-spacing;
+    }
+}
+
+// Hide controls
+.plyr--video.plyr--hide-controls .plyr__controls {
+    opacity: 0;
+    pointer-events: none;
+    transform: translateY(100%);
+}
+
+// Control elements
+.plyr--video .plyr__control {
+    // Hover and tab focus
+    &.plyr__tab-focus,
+    &:hover,
+    &[aria-expanded='true'] {
+        background: $plyr-video-control-bg-hover;
+        color: $plyr-video-control-color-hover;
+    }
+}
+
+// Large play button (video only)
+.plyr__control--overlaid {
+    background: rgba($plyr-video-control-bg-hover, 0.8);
+    border: 0;
+    border-radius: 100%;
+    color: $plyr-video-control-color;
+    display: none;
+    left: 50%;
+    padding: ceil($plyr-control-spacing * 1.5);
+    position: absolute;
+    top: 50%;
+    transform: translate(-50%, -50%);
+    z-index: 2;
+
+    // Offset icon to make the play button look right
+    svg {
+        left: 2px;
+        position: relative;
+    }
+
+    &:hover,
+    &:focus {
+        background: $plyr-video-control-bg-hover;
+    }
+}
+
+.plyr--playing .plyr__control--overlaid {
+    opacity: 0;
+    visibility: hidden;
+}
+
+.plyr--full-ui.plyr--video .plyr__control--overlaid {
+    display: block;
+}
+
+// Video range inputs
+.plyr--full-ui.plyr--video input[type='range'] {
+    &::-webkit-slider-runnable-track {
+        background-color: $plyr-video-range-track-bg;
+    }
+
+    &::-moz-range-track {
+        background-color: $plyr-video-range-track-bg;
+    }
+
+    &::-ms-track {
+        background-color: $plyr-video-range-track-bg;
+    }
+
+    // Pressed styles
+    &:active {
+        &::-webkit-slider-thumb {
+            @include plyr-range-thumb-active();
+        }
+
+        &::-moz-range-thumb {
+            @include plyr-range-thumb-active();
+        }
+
+        &::-ms-thumb {
+            @include plyr-range-thumb-active();
+        }
+    }
+}
+
+// Progress
+.plyr--video .plyr__progress__buffer {
+    color: $plyr-video-progress-buffered-bg;
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/utils/animation.scss

@@ -0,0 +1,7 @@
+// --------------------------------------------------------------
+// Animation utils
+// --------------------------------------------------------------
+
+.plyr--no-transition {
+    transition: none !important;
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sass/utils/hidden.scss

@@ -0,0 +1,28 @@
+// --------------------------------------------------------------
+// Hiding content nicely
+// --------------------------------------------------------------
+
+// Screen reader only elements
+.plyr__sr-only {
+    clip: rect(1px, 1px, 1px, 1px);
+    overflow: hidden;
+
+    // !important is not always needed
+    @if $plyr-sr-only-important {
+        border: 0 !important;
+        height: 1px !important;
+        padding: 0 !important;
+        position: absolute !important;
+        width: 1px !important;
+    } @else {
+        border: 0;
+        height: 1px;
+        padding: 0;
+        position: absolute;
+        width: 1px;
+    }
+}
+
+.plyr [hidden] {
+    display: none !important;
+}

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sprite/plyr-airplay.svg

@@ -0,0 +1,6 @@
+<svg width="18px" height="18px" viewBox="0 0 18 18" xmlns="http://www.w3.org/2000/svg">
+    <g>
+        <path d="M16,1 L2,1 C1.447,1 1,1.447 1,2 L1,12 C1,12.553 1.447,13 2,13 L5,13 L5,11 L3,11 L3,3 L15,3 L15,11 L13,11 L13,13 L16,13 C16.553,13 17,12.553 17,12 L17,2 C17,1.447 16.553,1 16,1 L16,1 Z"></path>
+        <polygon points="4 17 14 17 9 11"></polygon>
+    </g>
+</svg>

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sprite/plyr-captions-off.svg

@@ -0,0 +1,5 @@
+<svg width="18px" height="18px" viewBox="0 0 18 18" xmlns="http://www.w3.org/2000/svg">
+    <g fill-rule="evenodd" fill-opacity="0.5">
+        <path d="M1,1 C0.4,1 0,1.4 0,2 L0,13 C0,13.6 0.4,14 1,14 L5.6,14 L8.3,16.7 C8.5,16.9 8.7,17 9,17 C9.3,17 9.5,16.9 9.7,16.7 L12.4,14 L17,14 C17.6,14 18,13.6 18,13 L18,2 C18,1.4 17.6,1 17,1 L1,1 Z M5.52,11.15 C7.51,11.15 8.53,9.83 8.8,8.74 L7.51,8.35 C7.32,9.01 6.73,9.8 5.52,9.8 C4.38,9.8 3.32,8.97 3.32,7.46 C3.32,5.85 4.44,5.09 5.5,5.09 C6.73,5.09 7.28,5.84 7.45,6.52 L8.75,6.11 C8.47,4.96 7.46,3.76 5.5,3.76 C3.6,3.76 1.89,5.2 1.89,7.46 C1.89,9.72 3.54,11.15 5.52,11.15 Z M13.09,11.15 C15.08,11.15 16.1,9.83 16.37,8.74 L15.08,8.35 C14.89,9.01 14.3,9.8 13.09,9.8 C11.95,9.8 10.89,8.97 10.89,7.46 C10.89,5.85 12.01,5.09 13.07,5.09 C14.3,5.09 14.85,5.84 15.02,6.52 L16.32,6.11 C16.04,4.96 15.03,3.76 13.07,3.76 C11.17,3.76 9.46,5.2 9.46,7.46 C9.46,9.72 11.11,11.15 13.09,11.15 Z"></path>
+    </g>
+</svg>

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sprite/plyr-captions-on.svg

@@ -0,0 +1,5 @@
+<svg width="18px" height="18px" viewBox="0 0 18 18" xmlns="http://www.w3.org/2000/svg">
+    <g fill-rule="evenodd">
+        <path d="M1,1 C0.4,1 0,1.4 0,2 L0,13 C0,13.6 0.4,14 1,14 L5.6,14 L8.3,16.7 C8.5,16.9 8.7,17 9,17 C9.3,17 9.5,16.9 9.7,16.7 L12.4,14 L17,14 C17.6,14 18,13.6 18,13 L18,2 C18,1.4 17.6,1 17,1 L1,1 Z M5.52,11.15 C7.51,11.15 8.53,9.83 8.8,8.74 L7.51,8.35 C7.32,9.01 6.73,9.8 5.52,9.8 C4.38,9.8 3.32,8.97 3.32,7.46 C3.32,5.85 4.44,5.09 5.5,5.09 C6.73,5.09 7.28,5.84 7.45,6.52 L8.75,6.11 C8.47,4.96 7.46,3.76 5.5,3.76 C3.6,3.76 1.89,5.2 1.89,7.46 C1.89,9.72 3.54,11.15 5.52,11.15 Z M13.09,11.15 C15.08,11.15 16.1,9.83 16.37,8.74 L15.08,8.35 C14.89,9.01 14.3,9.8 13.09,9.8 C11.95,9.8 10.89,8.97 10.89,7.46 C10.89,5.85 12.01,5.09 13.07,5.09 C14.3,5.09 14.85,5.84 15.02,6.52 L16.32,6.11 C16.04,4.96 15.03,3.76 13.07,3.76 C11.17,3.76 9.46,5.2 9.46,7.46 C9.46,9.72 11.11,11.15 13.09,11.15 Z"></path>
+    </g>
+</svg>

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sprite/plyr-download.svg

@@ -0,0 +1,6 @@
+<svg width="18px" height="18px" viewBox="0 0 18 18" xmlns="http://www.w3.org/2000/svg">
+    <g transform="translate(2 1)">
+        <path d="M7,12 C7.3,12 7.5,11.9 7.7,11.7 L13.4,6 L12,4.6 L8,8.6 L8,0 L6,0 L6,8.6 L2,4.6 L0.6,6 L6.3,11.7 C6.5,11.9 6.7,12 7,12 Z" />
+        <rect width="14" height="2" y="14" />
+    </g>
+</svg>

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sprite/plyr-enter-fullscreen.svg

@@ -0,0 +1,4 @@
+<svg width="18px" height="18px" viewBox="0 0 18 18" xmlns="http://www.w3.org/2000/svg">
+    <polygon points="10 3 13.6 3 9.6 7 11 8.4 15 4.4 15 8 17 8 17 1 10 1"></polygon>
+    <polygon points="7 9.6 3 13.6 3 10 1 10 1 17 8 17 8 15 4.4 15 8.4 11"></polygon>
+</svg>

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sprite/plyr-exit-fullscreen.svg

@@ -0,0 +1,4 @@
+<svg width="18px" height="18px" viewBox="0 0 18 18" xmlns="http://www.w3.org/2000/svg">
+    <polygon points="1 12 4.6 12 0.6 16 2 17.4 6 13.4 6 17 8 17 8 10 1 10"></polygon>
+    <polygon points="16 0.6 12 4.6 12 1 10 1 10 8 17 8 17 6 13.4 6 17.4 2"></polygon>
+</svg>

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sprite/plyr-fast-forward.svg

@@ -0,0 +1,3 @@
+<svg width="18px" height="18px" viewBox="0 0 18 18" xmlns="http://www.w3.org/2000/svg">
+    <polygon points="7.875 7.17142857 0 1 0 17 7.875 10.8285714 7.875 17 18 9 7.875 1"></polygon>
+</svg>

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sprite/plyr-logo-vimeo.svg

@@ -0,0 +1,4 @@
+<svg xmlns="http://www.w3.org/2000/svg" width="18" height="18" viewBox="0 0 18 18">
+  <path d="M16,3.3 C15.9,4.9 14.8,7 12.7,9.7 C10.5,12.5 8.7,13.9 7.2,13.9 C6.3,13.9 5.5,13 4.8,11.3 C4,8.9 3.4,4 2,4 C1.9,4 1.5,4.3 0.8,4.8 L0,3.8 C0.8,3.1 3.5,0.4 4.7,0.3 C5.9,0.2 6.7,1 7,2.8 C7.3,4.8 7.8,8.9 8.8,8.9 C9.7,8.9 11.3,5.5 11.4,4.9 C11.5,4 11.1,3 9.1,3.8 C9.9,1.2 11.4,-8.8817842e-16 13.6,-8.8817842e-16 C15.3,0.1 16.1,1.2 16,3.3 Z"
+    transform="translate(1 2)" />
+</svg>

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sprite/plyr-logo-youtube.svg

@@ -0,0 +1,4 @@
+<svg xmlns="http://www.w3.org/2000/svg" width="18" height="18" viewBox="0 0 18 18">
+  <path d="M15.8,2.8 C15.6,1.5 15,0.6 13.6,0.4 C11.4,0 8,0 8,0 C8,0 4.6,0 2.4,0.4 C1,0.6 0.3,1.5 0.2,2.8 C0,4.1 0,6 0,6 C0,6 0,7.9 0.2,9.2 C0.4,10.5 1,11.4 2.4,11.6 C4.6,12 8,12 8,12 C8,12 11.4,12 13.6,11.6 C15,11.3 15.6,10.5 15.8,9.2 C16,7.9 16,6 16,6 C16,6 16,4.1 15.8,2.8 Z M6,9 L6,3 L11,6 L6,9 Z"
+    transform="translate(1 3)" />
+</svg>

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sprite/plyr-muted.svg

@@ -0,0 +1,4 @@
+<svg width="18px" height="18px" viewBox="0 0 18 18" xmlns="http://www.w3.org/2000/svg">
+    <polygon points="12.4 12.5 14.5 10.4 16.6 12.5 18 11.1 15.9 9 18 6.9 16.6 5.5 14.5 7.6 12.4 5.5 11 6.9 13.1 9 11 11.1"></polygon>
+    <path d="M3.78571429,6.00820648 L0.714285714,6.00820648 C0.285714286,6.00820648 0,6.30901277 0,6.76022222 L0,11.2723167 C0,11.7235261 0.285714286,12.0243324 0.714285714,12.0243324 L3.78571429,12.0243324 L7.85714286,15.8819922 C8.35714286,16.1827985 9,15.8819922 9,15.2803796 L9,2.75215925 C9,2.15054666 8.35714286,1.77453879 7.85714286,2.15054666 L3.78571429,6.00820648 Z"></path>
+</svg>

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sprite/plyr-pause.svg

@@ -0,0 +1,4 @@
+<svg width="18px" height="18px" viewBox="0 0 18 18" xmlns="http://www.w3.org/2000/svg">
+    <path d="M6,1 L3,1 C2.4,1 2,1.4 2,2 L2,16 C2,16.6 2.4,17 3,17 L6,17 C6.6,17 7,16.6 7,16 L7,2 C7,1.4 6.6,1 6,1 L6,1 Z"></path>
+    <path d="M12,1 C11.4,1 11,1.4 11,2 L11,16 C11,16.6 11.4,17 12,17 L15,17 C15.6,17 16,16.6 16,16 L16,2 C16,1.4 15.6,1 15,1 L12,1 Z"></path>
+</svg>

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sprite/plyr-pip.svg

@@ -0,0 +1,4 @@
+<svg width="18px" height="18px" viewBox="0 0 18 18" xmlns="http://www.w3.org/2000/svg">
+    <polygon points="13.293 3.293 7.022 9.564 8.436 10.978 14.707 4.707 17 7 17 1 11 1"></polygon>
+    <path d="M13,15 L3,15 L3,5 L8,5 L8,3 L2,3 C1.448,3 1,3.448 1,4 L1,16 C1,16.552 1.448,17 2,17 L14,17 C14.552,17 15,16.552 15,16 L15,10 L13,10 L13,15 L13,15 Z"></path>
+</svg>

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sprite/plyr-play.svg

@@ -0,0 +1,3 @@
+<svg width="18px" height="18px" viewBox="0 0 18 18" xmlns="http://www.w3.org/2000/svg">
+    <path d="M15.5615866,8.10002147 L3.87056367,0.225209313 C3.05219207,-0.33727727 2,0.225209313 2,1.12518784 L2,16.8748122 C2,17.7747907 3.05219207,18.3372773 3.87056367,17.7747907 L15.5615866,9.89997853 C16.1461378,9.44998927 16.1461378,8.55001073 15.5615866,8.10002147 L15.5615866,8.10002147 Z"></path>
+</svg>

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sprite/plyr-restart.svg

@@ -0,0 +1,3 @@
+<svg width="18px" height="18px" viewBox="0 0 18 18" xmlns="http://www.w3.org/2000/svg">
+    <path d="M9.7,1.2 L10.4,7.6 L12.5,5.5 C14.4,7.4 14.4,10.6 12.5,12.5 C11.6,13.5 10.3,14 9,14 C7.7,14 6.4,13.5 5.5,12.5 C3.6,10.6 3.6,7.4 5.5,5.5 C6.1,4.9 6.9,4.4 7.8,4.2 L7.2,2.3 C6,2.6 4.9,3.2 4,4.1 C1.3,6.8 1.3,11.2 4,14 C5.3,15.3 7.1,16 8.9,16 C10.8,16 12.5,15.3 13.8,14 C16.5,11.3 16.5,6.9 13.8,4.1 L16,1.9 L9.7,1.2 L9.7,1.2 Z"></path>
+</svg>

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sprite/plyr-rewind.svg

@@ -0,0 +1,3 @@
+<svg width="18px" height="18px" viewBox="0 0 18 18" xmlns="http://www.w3.org/2000/svg">
+    <polygon points="10.125 1 0 9 10.125 17 10.125 10.8285714 18 17 18 1 10.125 7.17142857"></polygon>
+</svg>

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sprite/plyr-settings.svg

@@ -0,0 +1,3 @@
+<svg width="18px" height="18px" viewBox="0 0 18 18" xmlns="http://www.w3.org/2000/svg">
+    <path d="M16.135,7.784 C14.832,7.458 14.214,5.966 14.905,4.815 C15.227,4.279 15.13,3.817 14.811,3.499 L14.501,3.189 C14.183,2.871 13.721,2.774 13.185,3.095 C12.033,3.786 10.541,3.168 10.216,1.865 C10.065,1.258 9.669,1 9.219,1 L8.781,1 C8.331,1 7.936,1.258 7.784,1.865 C7.458,3.168 5.966,3.786 4.815,3.095 C4.279,2.773 3.816,2.87 3.498,3.188 L3.188,3.498 C2.87,3.816 2.773,4.279 3.095,4.815 C3.786,5.967 3.168,7.459 1.865,7.784 C1.26,7.935 1,8.33 1,8.781 L1,9.219 C1,9.669 1.258,10.064 1.865,10.216 C3.168,10.542 3.786,12.034 3.095,13.185 C2.773,13.721 2.87,14.183 3.189,14.501 L3.499,14.811 C3.818,15.13 4.281,15.226 4.815,14.905 C5.967,14.214 7.459,14.832 7.784,16.135 C7.935,16.742 8.331,17 8.781,17 L9.219,17 C9.669,17 10.064,16.742 10.216,16.135 C10.542,14.832 12.034,14.214 13.185,14.905 C13.72,15.226 14.182,15.13 14.501,14.811 L14.811,14.501 C15.129,14.183 15.226,13.72 14.905,13.185 C14.214,12.033 14.832,10.541 16.135,10.216 C16.742,10.065 17,9.669 17,9.219 L17,8.781 C17,8.33 16.74,7.935 16.135,7.784 L16.135,7.784 Z M9,12 C7.343,12 6,10.657 6,9 C6,7.343 7.343,6 9,6 C10.657,6 12,7.343 12,9 C12,10.657 10.657,12 9,12 L9,12 Z"></path>
+</svg>

lisp/emacs-application-framework/app/js-video-player/node_modules/plyr/src/sprite/plyr-volume.svg

@@ -0,0 +1,5 @@
+<svg width="18px" height="18px" viewBox="0 0 18 18" xmlns="http://www.w3.org/2000/svg">
+    <path d="M15.5999996,3.3 C15.1999996,2.9 14.5999996,2.9 14.1999996,3.3 C13.7999996,3.7 13.7999996,4.3 14.1999996,4.7 C15.3999996,5.9 15.9999996,7.4 15.9999996,9 C15.9999996,10.6 15.3999996,12.1 14.1999996,13.3 C13.7999996,13.7 13.7999996,14.3 14.1999996,14.7 C14.3999996,14.9 14.6999996,15 14.8999996,15 C15.1999996,15 15.3999996,14.9 15.5999996,14.7 C17.0999996,13.2 17.9999996,11.2 17.9999996,9 C17.9999996,6.8 17.0999996,4.8 15.5999996,3.3 L15.5999996,3.3 Z"></path>
+    <path d="M11.2819745,5.28197449 C10.9060085,5.65794047 10.9060085,6.22188944 11.2819745,6.59785542 C12.0171538,7.33303477 12.2772954,8.05605449 12.2772954,9.00000021 C12.2772954,9.93588462 11.851678,10.9172014 11.2819745,11.4869049 C10.9060085,11.8628709 10.9060085,12.4268199 11.2819745,12.8027859 C11.4271642,12.9479755 11.9176724,13.0649528 12.2998149,12.9592565 C12.4124479,12.9281035 12.5156669,12.8776063 12.5978555,12.8027859 C13.773371,11.732654 14.1311161,10.1597914 14.1312523,9.00000021 C14.1312723,8.8299555 14.1286311,8.66015647 14.119665,8.4897429 C14.0674781,7.49784946 13.8010171,6.48513613 12.5978554,5.28197449 C12.2218894,4.9060085 11.6579405,4.9060085 11.2819745,5.28197449 Z"></path>
+    <path d="M3.78571429,6.00820648 L0.714285714,6.00820648 C0.285714286,6.00820648 0,6.30901277 0,6.76022222 L0,11.2723167 C0,11.7235261 0.285714286,12.0243324 0.714285714,12.0243324 L3.78571429,12.0243324 L7.85714286,15.8819922 C8.35714286,16.1827985 9,15.8819922 9,15.2803796 L9,2.75215925 C9,2.15054666 8.35714286,1.77453879 7.85714286,2.15054666 L3.78571429,6.00820648 Z"></path>
+</svg>