How to determine operating system in elisp?

前端 未结 7 784
一个人的身影
一个人的身影 2021-01-30 19:22

How do I programmatically determine which OS Emacs is running under in ELisp?

I would like to run different code in .emacs depending on the OS.

相关标签:
7条回答
  • 2021-01-30 19:47

    The system-type variable:

    system-type is a variable defined in `C source code'.
    Its value is darwin
    
    Documentation:
    Value is symbol indicating type of operating system you are using.
    Special values:
      `gnu'         compiled for a GNU Hurd system.
      `gnu/linux'   compiled for a GNU/Linux system.
      `darwin'      compiled for Darwin (GNU-Darwin, Mac OS X, ...).
      `ms-dos'      compiled as an MS-DOS application.
      `windows-nt'  compiled as a native W32 application.
      `cygwin'      compiled using the Cygwin library.
    Anything else indicates some sort of Unix system.
    
    0 讨论(0)
  • 2021-01-30 19:53

    I created a simple macro to easily run code depending on the system-type:

    (defmacro with-system (type &rest body)
      "Evaluate BODY if `system-type' equals TYPE."
      (declare (indent defun))
      `(when (eq system-type ',type)
         ,@body))
    
    (with-system gnu/linux
      (message "Free as in Beer")
      (message "Free as in Freedom!"))
    
    0 讨论(0)
  • 2021-01-30 19:56

    There's also (in versions 24-26 at least) system-configuration, if you want to adjust for differences in build system. However, the documentation of this variable does not describe the possible vales that it may contain like the documentation of the system-type variable does.

    0 讨论(0)
  • 2021-01-30 20:00

    For folks newer to elisp, a sample usage:

    (if (eq system-type 'darwin)
      ; something for OS X if true
      ; optional something if not
    )
    
    0 讨论(0)
  • 2021-01-30 20:00

    Now there is also Linux Subsystem for Windows (bash under Windows 10) where system-type is gnu/linux. To detect this system type use:

    (if
        (string-match "Microsoft"
             (with-temp-buffer (shell-command "uname -r" t)
                               (goto-char (point-max))
                               (delete-char -1)
                               (buffer-string)))
        (message "Running under Linux subsystem for Windows")
        (message "Not running under Linux subsystem for Windows")
      )
    
    0 讨论(0)
  • 2021-01-30 20:01

    This is mostly already answered, but for those interested, I just tested this on FreeBSD and there the reported value was "berkeley-unix".

    0 讨论(0)
提交回复
热议问题