iankelling.org Git - distro-setup/blob - g

   1 #!/bin/bash
   2 # I, Ian Kelling, follow the GNU license recommendations at
   3 # https://www.gnu.org/licenses/license-recommendations.en.html. They
   4 # recommend that small programs, < 300 lines, be licensed under the
   5 # Apache License 2.0. This file contains or is part of one or more small
   6 # programs. If a small program grows beyond 300 lines, I plan to switch
   7 # its license to GPL.
   8
   9 # Copyright 2024 Ian Kelling
  10
  11 # Licensed under the Apache License, Version 2.0 (the "License");
  12 # you may not use this file except in compliance with the License.
  13 # You may obtain a copy of the License at
  14
  15 #     http://www.apache.org/licenses/LICENSE-2.0
  16
  17 # Unless required by applicable law or agreed to in writing, software
  18 # distributed under the License is distributed on an "AS IS" BASIS,
  19 # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  20 # See the License for the specific language governing permissions and
  21 # limitations under the License.
  22
  23
  24
  25 # note: starting emacs server can hang due to errors in init files
  26 # which don't cause problems for non-server emacs. And things
  27 # that aren't errors can cause hang too, like when I added gnus
  28 # git to load path.
  29
  30 # I was experimenting with running
  31 # under gdb always to diagnose any hangs/crashes
  32 # and it won't work due to a gdb crash:
  33 # gdb -ex="set follow-fork-mode child" -ex=r -ex=quit --args emacsclient -nc
  34 # -n = --no-wait, go into background
  35 # -c = create new frame instead of reusing the current frame
  36 # -a = alternate editor, empty string makes it start emacs daemon.
  37 # This is also set via env variable, but that doesn't propagate everywhere.
  38
  39 # emacs will hold open the directory it's started in, which
  40 # will prevent unmounting it.
  41 if [[ ! $1 ]]; then
  42     cd /
  43 fi
  44
  45 if pgrep -u $EUID emacsclient && (( $# )); then
  46     emacsclient -a "" -n "$@"
  47 else
  48     emacsclient -a "" -nc "$@"
  49 fi