nb0yjxtr/ffmpeg-mythtv
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

add a recording-filesize function

Browse Source
This commit is contained in:
Leo Butler 2020-12-08 12:46:49 -06:00
parent fba4b359fa
commit bbb2c1ebf7
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ffmpeg-myth.scm
View File

@ -262,6 +262,8 @@
(define (recording-basename rec) (define (recording-basename rec)
(assv-ref (recording-recorded-table rec) 'basename)) (assv-ref (recording-recorded-table rec) 'basename))
(define (recording-filesize rec)
(assv-ref (recording-recorded-table rec) 'filesize))
(define (recording-new-file-name file-name ending) (define (recording-new-file-name file-name ending)
(let* ((old-ending (substring file-name (- (string-length file-name) 3))) (let* ((old-ending (substring file-name (- (string-length file-name) 3)))