gnu: Add kafs-client

[jackhill/guix/guix.git] / gnu / packages / patches / kio-search-smbd-on-PATH.patch

Adopted from NixOS
pkgs/development/libraries/kde-frameworks/kio/samba-search-path.patch

===================================================================
--- kio-5.17.0.orig/src/core/ksambashare.cpp
+++ kio-5.17.0/src/core/ksambashare.cpp
@@ -67,13 +67,18 @@ KSambaSharePrivate::~KSambaSharePrivate(
 
 bool KSambaSharePrivate::isSambaInstalled()
 {
-    if (QFile::exists(QStringLiteral("/usr/sbin/smbd"))
-            || QFile::exists(QStringLiteral("/usr/local/sbin/smbd"))) {
-        return true;
+    const QByteArray pathEnv = qgetenv("PATH");
+    if (!pathEnv.isEmpty()) {
+        QLatin1Char pathSep(':');
+        QStringList paths = QFile::decodeName(pathEnv).split(pathSep, QString::SkipEmptyParts);
+        for (QStringList::iterator it = paths.begin(); it != paths.end(); ++it) {
+            it->append(QStringLiteral("/smbd"));
+            if (QFile::exists(*it)) {
+                return true;
+            }
+        }
     }
 
-    //qDebug() << "Samba is not installed!";
-
     return false;
 }