A
не хочу я к этой всей жаваскриптовой вебне прикасаться
Size: a a a
2021 January 14
d
Сойпанки не нужны
n
Нормальные люди играют в cataclysm.dda
D
Можете помочь как убрать бойлерплейт? https://paste.sr.ht/~liltechdude/822394b44ed4cf5dab6dac1254f22c8f6a976c7b
A
В шахматишки
Сколько рейтинг в блице
d
Artem
Сколько рейтинг в блице
Я лучше промолчу
A
D
start-mpv (path &key start end fullscreen pause)
"Use mpv with to play file in `PATH'."
(unless (file-exists-p path)
(error "File that you want to play does not exist."))
(let ((+mpv-args (list)))
(when (or start end fullscreen pause)
(when start
(add-to-list '+mpv-args (format "--start=%s" start)))
(when end
(add-to-list '+mpv-args (format "--end=%s" end)))
(if pause
(add-to-list '+mpv-args "--pause")
(setq mpv-args (delete "--pause" mpv-args)))
(if fullscreen
(add-to-list '+mpv-args "--fullscreen")
(setq mpv-args (delete "--fullscreen" mpv-args))))
(apply #'call-process "mpv" nil 0 nil `(,@mpv-args ,@+mpv-args ,(expand-file-name path)))))
A
Немного, но это мой рейтинг
D
да ладно
d
Artem
У меня 1488 @xFA25E
Блиц не особо полезен для прокачки, особенно на первых порах
d
Я рапидую
A
В буллете 1337 был, но я чёт скатился
d
A
А больше мне и не нужно
Aß
бля, ебаные выдумщики
D
хоть что, но я хочу убрать when ы
EZ
start-mpv (path &key start end fullscreen pause)
"Use mpv with to play file in `PATH'."
(unless (file-exists-p path)
(error "File that you want to play does not exist."))
(let ((+mpv-args (list)))
(when (or start end fullscreen pause)
(when start
(add-to-list '+mpv-args (format "--start=%s" start)))
(when end
(add-to-list '+mpv-args (format "--end=%s" end)))
(if pause
(add-to-list '+mpv-args "--pause")
(setq mpv-args (delete "--pause" mpv-args)))
(if fullscreen
(add-to-list '+mpv-args "--fullscreen")
(setq mpv-args (delete "--fullscreen" mpv-args))))
(apply #'call-process "mpv" nil 0 nil `(,@mpv-args ,@+mpv-args ,(expand-file-name path)))))
(when (or start end fullscreen pause) точно не нужен вообщеA
A ß
бля, ебаные выдумщики
в смысле
A