12 lines
190 B
Fish
12 lines
190 B
Fish
|
#!/usr/bin/env fish
|
||
|
|
# -*- mode:fish; tab-width:4 -*-
|
||
|
|
|
||
|
|
function __flseg_write
|
||
|
|
|
||
|
|
if not test -w .
|
||
|
|
__fishline_segment $FLCLR_WRITE_BG $FLCLR_WRITE_FG
|
||
|
|
printf "$FLSYM_WRITE_LOCK"
|
||
|
|
end
|
||
|
|
|
||
|
|
end
|