small revision; add note about 'uic';
This commit is contained in:
parent
20516a7da7
commit
4208e0ddf9
2 changed files with 10 additions and 5 deletions
|
|
@ -44,11 +44,11 @@
|
|||
(defun grep (name)
|
||||
(flet ((one-space (s)
|
||||
(x:join (remove-if 'x:empty-string (x:split s)))))
|
||||
(let ((s (ext:run-program "grep" (list "-rn"
|
||||
"--include"
|
||||
"*.qml"
|
||||
(format nil "objectName:[[:space:]]*~S" name)
|
||||
"qml/"))))
|
||||
(let ((s (ext:run-program "grep" (list "-rn"
|
||||
"--include"
|
||||
"*.qml"
|
||||
(format nil "objectName:[[:space:]]*~S" name)
|
||||
"qml/"))))
|
||||
(loop :for line = (read-line s nil nil)
|
||||
:while line :collect (one-space line)))))
|
||||
|
||||
|
|
|
|||
|
|
@ -1,6 +1,11 @@
|
|||
;;; copyright (c) Polos Ruetz
|
||||
;;;
|
||||
;;; user interface compiler
|
||||
;;;
|
||||
;;; N.B. you need to point a symbolic link to your 'uic', like:
|
||||
;;;
|
||||
;;; cd /usr/bin
|
||||
;;; sudo ln -s ~/Qt5.13.2/5.13.2/gcc_64/bin/uin uic
|
||||
|
||||
(defpackage :quic
|
||||
(:use :common-lisp :eql)
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue