diff options
| author | jao <jao@gnu.org> | 2026-01-21 13:40:13 +0000 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2026-01-21 13:40:13 +0000 |
| commit | cc42a096c267ae184e20960d3f397ef083855f04 (patch) | |
| tree | 9e93d57379bae5df6802b7defbcfab5d3142f4cd /lib/doc/jao-mac.el | |
| parent | 4e71898553e91f629c91fc13a123f85eb1475bae (diff) | |
| download | elibs-cc42a096c267ae184e20960d3f397ef083855f04.tar.gz elibs-cc42a096c267ae184e20960d3f397ef083855f04.tar.bz2 | |
mac badges: whitespace in app namesmain
Diffstat (limited to 'lib/doc/jao-mac.el')
| -rw-r--r-- | lib/doc/jao-mac.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/doc/jao-mac.el b/lib/doc/jao-mac.el index eca5d9a..269e853 100644 --- a/lib/doc/jao-mac.el +++ b/lib/doc/jao-mac.el @@ -1,6 +1,6 @@ ;;; jao-mac.el --- Running applescript. -*- lexical-binding: t; -*- -;; Copyright (C) 2025 Jose Antonio Ortega Ruiz +;; Copyright (C) 2025, 2026 Jose Antonio Ortega Ruiz ;; Author: Jose Antonio Ortega Ruiz <mail@jao.io> ;; Keywords: lisp @@ -83,7 +83,7 @@ (defun jao-mac-app-badge (app) "A very hacky, yet efficient, way of getting and apps badge." - (let* ((c (format "lsappinfo info -app %s -only StatusLabel" app)) + (let* ((c (format "lsappinfo info -app %S -only StatusLabel" app)) (s (shell-command-to-string c))) (when (string-match ".*=\"\\([0-9]+\\)\" ." s) (string-to-number (match-string 1 s)))) ) |