nongnu: zoom: Fix background blurring and virtual backgrounds.
There is a long list of libraries for LD_LIBRARY_PATH that could be refactored into a LET form, but alas could not figure out with the many quotes and gexps how right now. Or aomhost may only need a subset of these. * nongnu/packages/messaging.scm (zoom)[patchelf-plan]: Add aomhost. [phases]{wrap-where-patchelf-does-not-work}: Wrap it.
This commit is contained in:
parent
76d776a3f5
commit
917c329007
|
@ -323,6 +323,8 @@ or iOS.")
|
||||||
("lib/zoom/zoom"
|
("lib/zoom/zoom"
|
||||||
,libs)
|
,libs)
|
||||||
("lib/zoom/zopen"
|
("lib/zoom/zopen"
|
||||||
|
,libs)
|
||||||
|
("lib/zoom/aomhost"
|
||||||
,libs)))
|
,libs)))
|
||||||
#:phases
|
#:phases
|
||||||
#~(modify-phases %standard-phases
|
#~(modify-phases %standard-phases
|
||||||
|
@ -350,6 +352,49 @@ or iOS.")
|
||||||
"libxrender"
|
"libxrender"
|
||||||
"zlib")))))
|
"zlib")))))
|
||||||
(wrap-program (string-append #$output "/lib/zoom/zoom")
|
(wrap-program (string-append #$output "/lib/zoom/zoom")
|
||||||
|
`("FONTCONFIG_PATH" ":" prefix
|
||||||
|
(,(string-join
|
||||||
|
(list
|
||||||
|
(string-append #$(this-package-input "fontconfig-minimal") "/etc/fonts")
|
||||||
|
#$output)
|
||||||
|
":")))
|
||||||
|
`("LD_LIBRARY_PATH" prefix
|
||||||
|
,(list (string-append #$(this-package-input "nss") "/lib/nss")
|
||||||
|
#$@(map (lambda (pkg)
|
||||||
|
(file-append (this-package-input pkg) "/lib"))
|
||||||
|
;; TODO: Reuse this long list as it is
|
||||||
|
;; needed for aomhost. Or perhaps
|
||||||
|
;; aomhost has a shorter needed list,
|
||||||
|
;; but untested.
|
||||||
|
'("alsa-lib"
|
||||||
|
"atk"
|
||||||
|
"at-spi2-atk"
|
||||||
|
"at-spi2-core"
|
||||||
|
"cairo"
|
||||||
|
"cups"
|
||||||
|
"dbus"
|
||||||
|
"eudev"
|
||||||
|
"expat"
|
||||||
|
"gcc"
|
||||||
|
"glib"
|
||||||
|
"mesa"
|
||||||
|
"mit-krb5"
|
||||||
|
"nspr"
|
||||||
|
"libxcb"
|
||||||
|
"libxcomposite"
|
||||||
|
"libxdamage"
|
||||||
|
"libxext"
|
||||||
|
"libxkbcommon"
|
||||||
|
"libxkbfile"
|
||||||
|
"libxrandr"
|
||||||
|
"libxshmfence"
|
||||||
|
"pango"
|
||||||
|
"pulseaudio"
|
||||||
|
"xcb-util"
|
||||||
|
"xcb-util-wm"
|
||||||
|
"xcb-util-renderutil"
|
||||||
|
"zlib")))))
|
||||||
|
(wrap-program (string-append #$output "/lib/zoom/aomhost")
|
||||||
`("FONTCONFIG_PATH" ":" prefix
|
`("FONTCONFIG_PATH" ":" prefix
|
||||||
(,(string-join
|
(,(string-join
|
||||||
(list
|
(list
|
||||||
|
@ -402,6 +447,8 @@ or iOS.")
|
||||||
(lambda _
|
(lambda _
|
||||||
(delete-file (string-append #$output "/environment-variables"))
|
(delete-file (string-append #$output "/environment-variables"))
|
||||||
(mkdir-p (string-append #$output "/bin"))
|
(mkdir-p (string-append #$output "/bin"))
|
||||||
|
(symlink (string-append #$output "/lib/zoom/aomhost")
|
||||||
|
(string-append #$output "/bin/aomhost"))
|
||||||
(symlink (string-append #$output "/lib/zoom/zoom")
|
(symlink (string-append #$output "/lib/zoom/zoom")
|
||||||
(string-append #$output "/bin/zoom"))
|
(string-append #$output "/bin/zoom"))
|
||||||
(symlink (string-append #$output "/lib/zoom/zopen")
|
(symlink (string-append #$output "/lib/zoom/zopen")
|
||||||
|
|
Loading…
Reference in New Issue
Block a user