wilderjds
/
.emacs.d
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Adjust qdbus to use the qt6 version

Browse Source
master
Jacopo De Simoi 8 months ago
parent 56321b557a
commit a0aff1f2bf
1 changed files with 2 additions and 2 deletions
Whitespace
Show all changes Ignore whitespace when comparing lines Ignore changes in amount of whitespace Ignore changes in whitespace at EOL
Split View
Diff Options
Show Stats Download Patch File Download Diff File
  1. 4
      global.org

4
global.org
Unescape View File

@ -759,10 +759,10 @@
#+begin_src emacs-lisp
(defun kde-current-activity ()
"Returns the current KDE activity"
(substring (let ((default-directory "~")) (shell-command-to-string "qdbus org.kde.ActivityManager /ActivityManager/Activities org.kde.ActivityManager.Activities.CurrentActivity")) 0 -1))
(substring (let ((default-directory "~")) (shell-command-to-string "qdbus6 org.kde.ActivityManager /ActivityManager/Activities org.kde.ActivityManager.Activities.CurrentActivity")) 0 -1))
(defun kde-current-activity-name ()
"Returns the name of the current KDE activity"
(substring (let ((default-directory "~")) (shell-command-to-string (concat "qdbus org.kde.ActivityManager /ActivityManager/Activities org.kde.ActivityManager.Activities.ActivityName " (kde-current-activity)))) 0 -1))
(substring (let ((default-directory "~")) (shell-command-to-string (concat "qdbus6 org.kde.ActivityManager /ActivityManager/Activities org.kde.ActivityManager.Activities.ActivityName " (kde-current-activity)))) 0 -1))
#+end_src
#+begin_src emacs-lisp

Write Preview
Loading…
Cancel
Save