▼Enigma-Emacs
On this page:
make-emacs-cmdline-args
9.2
    contents    up   

5 Enigma API: Load Path🔗

 (require enigma/emacs/path/load-path) package: enigma-app

procedure

(make-emacs-cmdline-args load-path-dirs    
  extra-emacs-flags) → (listof string?)
  load-path-dirs : (listof path-string?)
  extra-emacs-flags : (listof string?)
Build command-line arguments for Emacs from load-path-dirs and extra-emacs-flags.

The source code of this module:

#lang racket/base
 
(require racket/contract/base)
(require racket/match)
 
(provide
 (contract-out
  [make-emacs-cmdline-args
   (-> (listof path-string?) (listof string?)
       (listof string?))]))
 
(define (make-emacs-cmdline-args load-path-dirs extra-emacs-flags)
  (define load-flags
    (for/fold ([args '()])
              ([load-path-dir load-path-dirs])
      `(,@args "-L" ,(match load-path-dir
                       [(? string? s) s]
                       [p (path->string p)]))))
  (append load-flags extra-emacs-flags))
    contents    up