Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
itminedu
snf-ganeti
Commits
381be58a
Commit
381be58a
authored
May 20, 2010
by
Iustin Pop
Browse files
Another haddoc fix…
parent
c854092b
Changes
1
Hide whitespace changes
Inline
Side-by-side
Ganeti/HTools/Loader.hs
View file @
381be58a
...
...
@@ -153,7 +153,7 @@ extractExTags =
map
(
drop
(
length
exTagsPrefix
))
.
filter
(
isPrefixOf
exTagsPrefix
)
-- | Extracts the common suffix from node/instance names
-- | Extracts the common suffix from node
\
/instance names
commonSuffix
::
Node
.
List
->
Instance
.
List
->
String
commonSuffix
nl
il
=
let
node_names
=
map
Node
.
name
$
Container
.
elems
nl
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment