From 17ca198ba398068583e69bfca2d8f83d1c8ba8da Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Fri, 1 Apr 2022 17:34:45 -0700 Subject: rename *STANDARD-LINUX-VFS* -> *LINUX-BASIC-VFS* Signed-off-by: Sean Whitton --- src/property/installer.lisp | 2 +- src/property/mount.lisp | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) (limited to 'src/property') diff --git a/src/property/installer.lisp b/src/property/installer.lisp index 7c0e306..60c17d7 100644 --- a/src/property/installer.lisp +++ b/src/property/installer.lisp @@ -285,7 +285,7 @@ using a combinator like ON-CHANGE, or applied manually with DEPLOY-THESE." ;; Remount (mainly virtual) filesystems that other properties we will ;; apply might require (esp. relevant for installing bootloaders). - (dolist (mount mount:*standard-linux-vfs*) + (dolist (mount mount:*linux-basic-vfs*) (unless (preservedp (ensure-directory-pathname (lastcar mount))) (apply #'system "mount" mount))) (when efi-system-partition-mount-args diff --git a/src/property/mount.lisp b/src/property/mount.lisp index dc6a559..98013a2 100644 --- a/src/property/mount.lisp +++ b/src/property/mount.lisp @@ -103,7 +103,7 @@ Uses findmnt(8), so Linux-specific." ;;;; Utilities for :LISP properties -(defparameter *standard-linux-vfs* '( +(defparameter *linux-basic-vfs* '( ("-t" "proc" "-o" "nosuid,noexec,nodev" "proc" "/proc") ("-t" "sysfs" "-o" "nosuid,noexec,nodev,ro" "sys" "/sys") ("-t" "devtmpfs" "-o" "mode=0755,nosuid" "udev" "/dev") -- cgit v1.2.3