macOS enhancements

uno/modules/lang/+index.org

@@ -28,6 +28,15 @@ Define language package.
     (ligature-set-ligatures 'makefile-mode '(":=" "?=")))
 #+END_SRC
 
+* Shell Script
+
+#+BEGIN_SRC emacs-lisp
+  (use-package emacs
+    :after (uno-lang ligature sh-script)
+    :config
+    (ligature-set-ligatures 'sh-mode '("!=" "==" "&&" "||")))
+#+END_SRC
+
 * XML
 
 #+BEGIN_SRC emacs-lisp

uno/modules/lang/elisp/+index.org

@@ -27,3 +27,12 @@ Define Emacs Lisp language package.
         (make-local-variable 'flycheck-disabled-checkers)
         (push 'emacs-lisp-checkdoc flycheck-disabled-checkers))))
 #+END_SRC
+
+* Ligatures
+
+#+BEGIN_SRC emacs-lisp
+  (use-package emacs
+    :after (uno-lang-elisp ligature)
+    :config
+    (ligature-set-ligatures 'emacs-lisp-mode '(";;")))
+#+END_SRC

uno/modules/ui/emacs.org

@@ -27,6 +27,8 @@ Define UI Emacs package.
     :custom
     (display-line-numbers-type 'relative)
     (display-line-numbers-width-start t)
+    (frame-resize-pixelwise t)
+    (frame-title-format '("Emacs - %b"))
     (help-window-select t)
     (minibuffer-prompt-properties '(read-only
                                     t
@@ -34,6 +36,7 @@ Define UI Emacs package.
                                     minibuffer-avoid-prompt
                                     face
                                     minibuffer-prompt))
+    (ring-bell-function 'ignore)
     :hook
     ((special-mode uno-prog-mode uno-text-mode) . uno/ui/emacs/setup-mode)
     (uno-prog-mode . uno/ui/emacs/setup-prog)

uno/modules/ui/theme.org

@@ -39,7 +39,9 @@ Define UI theme package.
       (when (x-list-fonts -fixed-font)
         (set-face-attribute 'default nil
                             :family -fixed-font
-                            :height 100
+                            :height (cond
+                                     ((eq system-type 'darwin) 140)
+                                     (t 100))
                             :weight 'medium)
         (set-face-attribute 'fixed-pitch nil :family -fixed-font))
       (when (x-list-fonts -variable-font)